Windows stöder flera skriptspråk , inklusive Visual Basic Scripting Edition , eller VBScript . Med intuitiv , engelska - liknande syntax , är VBScript ett lätt språk att lära sig . VBScript enbart är en miljö som lämpar sig för många vanliga administrativa uppgifter , men dess större värde kommer från dess förmåga att interagera med andra komponenter i operativsystemet , såsom Windows Management Instrumentation service ( WMI ) . WMI lagrar detaljerad information om din dator och kan användas tillsammans med VBScript för att övervaka eller ta reda på tillståndet hos någon komponent som överensstämmer med WMI standarder , inklusive lägga till eller ta bort skrivare objekt . Saker du behöver
Microsoft Windows 2000 eller nyare
Visa fler instruktioner
1
Logga in på datorn med ett konto som har administratörsbehörighet .
2
Öppna Windows Anteckningar genom att skriva " notepad " i sökfältet på " Start " -menyn . Om du använder Windows XP , klicka på "Start " och sedan " Kör ... , " typ " notepad " och tryck på " OK . " Addera 3
Klicka på " Format " på menyn bar i Anteckningar och välj sedan " Word Wrap " för att växla den funktionen . Detta kommer att göra ditt manus lättare att läsa .
4
Typ strComputer = " . " på den första raden i filen . Detta indikerar att du vill att skriptet ska köras mot den lokala datorn . Om du vill köra skriptet mot en annan dator och har rätt behörighet , kan du byta ut " . " med namnet på fjärrdatorn .
5
Lägg till följande kodrad i ditt manus . Innan du kan söka i WMI tjänsten för information om datorn , måste VBScript bifoga först , eller binda , till den tjänsten
Set objWMIService = GetObject ( . " Winmgmts : { impersonationLevel = imitera } \\ \\ " & strComputer & " \\ root \\ cimv2 " )
6
Query WMI tjänsten för en lista över alla skrivare som är installerade på den lokala datorn , och för varje skrivare hittades , bekräfta raderingen . Slutför skriptet genom att skriva in följande kod :
Set colPrinters = objWMIService.ExecQuery ( " SELECT * FROM Win32_Printer " ) katalog
För varje objPrinter i colPrinters
RET = MsgBox ( " Är du säker på att du vill ta bort följande skrivare : " & objPrinter.Name , vbYesNo , " Bekräfta skrivaren tas bort " ) katalog p Om RET = 6 Då
objPrinter.Delete_
Avsluta om
Nästa
wscript.quit
7
Spara Anteckningar -filen med ändelsen * . vbs , och sedan dubbelklicka på filen för att starta skriptet .
