Programação  
 
Conhecimento computador >> Programação >> Programação Visual Basics >> 
Como excluir todas as impressoras com VBScript
Windows suporta várias linguagens de script , incluindo Visual Basic Scripting Edition, ou VBScript. Com intuitivo, sintaxe Inglês -like, VBScript é uma linguagem fácil de aprender. Sozinho VBScript é um ambiente adequado para muitas tarefas administrativas comuns , mas seu maior valor vem de sua capacidade de interagir com outros componentes do sistema operacional , como o Windows Management Instrumentation Serviço (WMI). Lojas WMI informações detalhadas sobre o seu computador e pode ser usado em conjunto com VBScript para monitorar ou descobrir o estado de qualquer componente que está em conformidade com os padrões de WMI , incluindo adição ou exclusão de objetos de impressora . Coisas que você precisa
Microsoft Windows 2000 ou mais recente
Show Mais instruções
1

Faça logon no computador com uma conta que tenha permissões administrativas .
< Br > 2

Abra o Windows Notepad , digitando " bloco de notas " no campo de busca no menu "Iniciar" . Se você estiver usando o Windows XP , clique em "Iniciar" e depois em "Executar ... ", digite " notepad" e pressione " OK".
3

Clique em " Formatar" no menu bar no bloco de notas , em seguida, selecione " Word Wrap " para alternar esta característica . Isso fará com que seu script mais fácil de ler .
4

Tipo strComputer = "." na primeira linha do arquivo. Isso indica que você deseja que o script para ser executado contra o computador local. Se você deseja executar o script em outro computador e ter as permissões apropriadas , você pode substituir " . " com o nome do computador remoto.
5

Adicione a seguinte linha de código para o seu script. Antes que você pode consultar o serviço WMI para obter informações sobre o computador , VBScript deve primeiro anexar ou vincular, para que o serviço

Set objWMIService = GetObject ( " winmgmts : { ImpersonationLevel = impersonate } \\ \\ " . & StrComputer & " \\ root \\ cimv2 " )
6

consultar o serviço WMI para obter uma lista de todas as impressoras instaladas no computador local, e para cada impressora encontrada, confirmar a exclusão . Conclua o script digitando o seguinte código:

Set colPrinters = objWMIService.ExecQuery ("Select * from Win32_Printer " )

Para Cada objPrinter em colPrinters

ret = MsgBox ( "Você tem certeza que deseja excluir a seguinte impressão :" & objPrinter.Name , vbYesNo , " Confirmar a exclusão da impressora" )

Se ret = 6 Então

objPrinter.Delete_

Fim se

Próxima

Wscript.Quit
7

Salve o arquivo de bloco de notas com a extensão * . vbs , em seguida, clique duas vezes no arquivo para iniciar o script.

Anterior :

Próximo : No
  Os artigos relacionados
·Como editar XML Com um GridView no ASP.NET e Visual Bas…
·Como olhar para o registro em VB6 
·Como enviar comandos Telnet a partir de Visual Basic 
·Como encontrar as cores de uma imagem digital usando VB…
·Como exportar itens de ListBox em arquivos de texto em …
·Como fazer um trabalho original em Visual Basic 6 
·Como fazer Dice eletrônicos 
·Como girar uma imagem usando Matrix Classe em Vb.Net 
·Como abrir um programa com o Visual Basic 
·Como enviar um buffer para fechar um soquete 
  Artigos em destaque
·Como Chegar MP3 File Length por VBScript 
·Como fazer upload de arquivos usando Ajax e PHP 
·Como carregar Stream Flash Sockets em VB.NET 
·Como faço para criar uma macro do Word documento em VB…
·Como usar msvidctl em Visual Basic 6 
·Como levantar um aviso em Python 
·Como definir um SVN no Eclipse 
·Como faço para alterar a ordem de item em StackPanel 
·Como alinhar tabelas HTML para o Direito de Texto 
·Como corresponder uma String em um Array usando Java 
Cop e direita © Conhecimento computador http://ptcomputador.com Todos os Direitos Reservados