Windows ondersteunt verschillende scripting talen , waaronder Visual Basic Scripting Edition , of VBScript . Met intuïtieve , Engels - achtige syntax , VBScript is een makkelijke taal om te leren . VBScript alleen al is een omgeving die geschikt is voor veel voorkomende administratieve taken , maar zijn grotere waarde komt voort uit haar vermogen tot interactie met andere componenten van het besturingssysteem , zoals Windows Management Instrumentation Dienst ( WMI ) . WMI slaat gedetailleerde informatie over uw computer en kan worden gebruikt in combinatie met VBScript om toezicht te houden of uit te vinden de toestand van een component die voldoet aan de WMI- normen , met inbegrip van printer objecten toevoegen of verwijderen . Wat je nodig hebt
Microsoft Windows 2000 of nieuwer
Toon Meer Aanwijzingen
1 Meld u aan op uw computer met een account die beheerdersrechten heeft .
< Br > 2 Open Windows Kladblok door te typen " notepad " in het zoekveld op het menu 'Start' . Als u Windows XP gebruikt , klikt u op "Start " en vervolgens " Uitvoeren ... , " type " notepad " en druk op " OK".
3 Klik op " Format " op het menu bar in Kladblok , selecteer dan " Word Wrap " om die functie uit te schakelen . Dit zal je script beter leesbaar te maken .
Type strComputer 4 = " . " op de eerste regel van het bestand . Dit geeft aan dat u het script wilt laten uitvoeren op de lokale computer . Als u het script wilt tegen een andere computer uit te voeren en de juiste machtigingen hebben , kunt u deze vervangen " . " met de naam van de externe computer .
5 Voeg de volgende regel code aan uw script . Voordat u de WMI- service voor informatie over de computer kan opvragen , moet VBScript eerst bevestigen , of te binden , om die dienst Set
objWMIService = GetObject ( . " Winmgmts : { impersonationLevel = impersonate } \\ \\ " & strComputer & " \\ root \\ cimv2 " ) op Twitter Query 6 de WMI -service voor een lijst van alle printers die op de lokale computer geïnstalleerd , en voor elke printer gevonden , bevestigen verwijdering . Vul het script door het invoeren van de volgende code : Set colPrinters
= objWMIService.ExecQuery ( " Select * van Win32_Printer " ) op Twitter voor Elke objPrinter in colPrinters
ret = MsgBox ( " Weet u zeker dat u de volgende printer te verwijderen : " & objPrinter.Name , vbYesNo , " Bevestig printer verwijderen " ) op Twitter Als ret = 6 dan
objPrinter.Delete_
Einde als Volgende Wscript.Quit
7
Sla het Kladblok-bestand met de extensie * . vbs , en dubbelklik op het bestand om te starten het script .
|
