Windows supporta diversi linguaggi di scripting, tra cui Visual Basic Scripting Edition o VBScript. Con intuitiva, la sintassi inglese-like, VBScript è una lingua facile da imparare. VBScript solo è un ambiente adatto per vari compiti amministrativi comuni, ma il suo maggior valore deriva dalla sua capacità di interagire con gli altri componenti del sistema operativo, ad esempio il servizio di gestione di Windows Instrumentation (WMI). memorizza WMI dettagliate informazioni sul computer e possono essere utilizzati in combinazione con VBScript per monitorare o scoprire lo stato di qualsiasi componente che è conforme agli standard WMI, tra cui l'aggiunta o la cancellazione di oggetti stampante.

istruzione

1 Accedere al computer con un account che dispone di autorizzazioni amministrative.

2 Aprire il blocco note di Windows digitando "notepad" nel campo di ricerca sul menu "Start". Se si utilizza Windows XP, fare clic su "Start" e poi "Esegui ...," tipo "notepad" e premere "OK".

3 Fai clic su "Formato" sulla barra dei menu in Blocco note, quindi selezionare "A capo automatico" per attivare o disattivare tale funzionalità. Questo renderà il vostro script più facile da leggere.

4 Digitare strComputer = "." sulla prima riga del file. Questo indica che si desidera eseguire lo script contro il computer locale. Se si desidera eseguire lo script contro un altro computer e avere le autorizzazioni appropriate, è possibile sostituire "." con il nome del computer remoto.

5 Aggiungere la seguente riga di codice per lo script. Prima di poter interrogare il servizio WMI per informazioni sul computer, VBScript deve prima collegare, o si legano, a tale servizio.

Set objWMIService = GetObject ( "winmgmts: {ImpersonationLevel = impersonate} \" & strComputer & "\ root \ CIMV2")

6 Interrogare il servizio WMI per un elenco di tutte le stampanti installate sul computer locale, e per ogni stampante trovata, confermare l'eliminazione. Completa lo script inserendo il seguente codice:

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

Per ogni objPrinter in colPrinters

ret = MsgBox("Are you sure you want to delete the following printer: " & objPrinter.Name, vbYesNo, "Confirm Printer Deletion")

Se ret = 6 Poi

objPrinter.Delete_

Finisci se

Il prossimo

WScript.Quit

7 Salvare il file di blocco note con estensione * .vbs, e quindi fare doppio clic sul file per avviare lo script.

Consigli e avvertenze

• Se si desidera visualizzare un elenco delle stampanti installate senza peraltro riuscire a cancellare, modificare la riga di codice che legge "objPrinter.Delete_" a "Wscript.Echo objPrinter.Name."
• L'esecuzione del codice eliminare tutti gli oggetti di stampanti locali e di rete dal computer locale. Se si elimina una stampante inavvertitamente, utilizzare la procedura guidata "Aggiungi stampante" per reinstallarlo.