Windows unterstützt mehrere Skriptsprachen , einschließlich Visual Basic Scripting Edition oder VBScript . Mit der intuitiven , Englisch -ähnliche Syntax , ist VBScript eine einfache Sprache zu lernen. VBScript allein ist eine Umgebung, geeignet für viele gängige Verwaltungsaufgaben , aber seine größeren Wert kommt von seiner Fähigkeit, mit anderen Komponenten des Betriebssystems , wie der Windows Management Instrumentation Service (WMI) interagieren. WMI speichert detaillierte Informationen über Ihren Computer und können in Verbindung mit VBScript verwendet werden, um zu überwachen oder herauszufinden, die den Zustand einer Komponente , die an die WMI -Standards, einschließlich Hinzufügen oder Löschen von Objekten Drucker entspricht . Things You
Microsoft Windows 2000 oder neuer
brauchen anzeigen Weitere Anweisungen
1

Melden Sie sich am Computer mit einem Konto , das über Administratorrechte verfügt .
< Br > 2

öffnen Sie den Windows Editor, indem Sie "notepad " in das Suchfeld auf der "Start "-Menü. Wenn Sie Windows XP verwenden , klicken Sie auf "Start" und dann auf "Ausführen ... ", geben Sie "Notepad " und drücken Sie "OK".
3

Klicken Sie auf " Format " im Menü bar in Notepad , und wählen Sie dann " Zeilenumbruch " , um diese Funktion auszuschalten. Dadurch wird Ihr Skript leichter zu lesen.
4

Typ strComputer = "." in der ersten Zeile der Datei. Dies deutet darauf hin , dass Sie das Skript , um gegen den lokalen Computer ausgeführt werden soll. Wenn Sie das Skript gegen einen anderen Computer ausgeführt werden und über die entsprechenden Berechtigungen möchten, können Sie ersetzen Sie " . " mit dem Namen des Remote-Computers .
5

Fügen Sie die folgende Codezeile zu Ihrem Script. Bevor Sie den WMI-Dienst für Informationen über den Computer abfragen können , müssen VBScript ersten anhängen oder binden , zu diesem Dienst

Set objWMIService = GetObject ( ". Winmgmts : { impersonationLevel = impersonate } \\ \\ " & strComputer & "\\ root \\ cimv2 " )
6

Abfrage der WMI-Dienst für eine Liste aller Drucker auf dem lokalen Computer installiert , und für jeden Drucker gefunden , bestätigen Löschung. Füllen Sie das Skript durch Eingabe der folgenden Code:

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

For Each objPrinter in colPrinters

ret = MsgBox ( " Sind Sie sicher, dass Sie die folgenden Drucker zu löschen :" & objPrinter.Name , vbYesNo " bestätigen Printer Deletion" )

Wenn ret = 6 Dann

objPrinter.Delete_
< p> End if

Weiter

Wscript.Quit
7

Speichern Sie die Editor-Datei mit der Endung * . vbs , und doppelklicken Sie dann auf die Datei starten das Skript .