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.