Sådan slettes alle printere med VBScript

Indlæg af Alice Hansen     opdateret: 2011-06-29

Windows understøtter flere scriptsprog , herunder Visual Basic Scripting Edition eller VBScript . Med intuitive , engelsk-lignende syntaks , er VBScript et let sprog at lære . VBScript alene er et miljø egnet til mange almindelige administrative opgaver , men dens større værdi kommer fra dens evne til at interagere med andre dele af operativsystemet, som f. eks Windows Management Instrumentation Service ( WMI ) . WMI gemmer detaljerede oplysninger om din computer og kan bruges i forbindelse med VBScript til at overvåge eller finde ud af staten af enhver komponent , der passer til WMI standarder , herunder at tilføje eller slette printer objekter .

Du skal bruge: . .
Microsoft Windows 2000 eller nyere


1
Log på din computer med en konto, der har administratorrettigheder

2 .
Åbn Windows Notesblok ved at skrive " notesblok " i søgefeltet på " Start " -menuen . Hvis du bruger Windows XP , klik på " Start " og derefter " Run . . . , "type" notesblok " , og tryk på " OK ".
3 .
Klik på " Format " på menulinjen i Notesblok , og vælg derefter " Word Wrap "for at skifte denne facilitet fra . Dette vil gøre dit script nemmere at læse .
4 .
Type strComputer=" . " på den første linje i filen . Dette indikerer , at du vil scriptet til at køre mod den lokale computer . Hvis du ønsker at køre scriptet mod en anden computer , og har de relevante tilladelser , kan du erstatte " . " med navnet på fjerncomputeren .
5 .
Tilføj følgende linje kode til dit script . Før du kan søge i den WMI service for at få oplysninger om computeren , skal VBScript først vedhæfte, eller binde , at denne tjeneste

Set objWMIService=GetObject ( " winmgmts : . { impersonationLevel=parodiere } ! \ \ " strComputer " \ root \ cimv2 " )
6 .
Query WMI service til en liste over alle printere installeret på den lokale computer , og for hver printer fundet , at bekræfte sletningen. Komplet scriptet ved at indtaste følgende kode :

Set colPrinters=objWMIService. ExecQuery ( " SELECT * FROM Win32_Printer " )
For hver objPrinter i colPrinters
RET=MsgBox ( "Er du sikker på du vil slette følgende printeren : " objPrinter. Name , vbYesNo , " Bekræft Printer sletning " )
Hvis RET=6 Så
objPrinter . Delete_
End hvis
Næste
Wscript. Quit
7 .
Gem Notesblok -fil med udvidelse *. vbs , og derefter dobbeltklikke på filen for at starte scriptet .

gode råd og advarsler


  • Hvis du vil se en liste over installerede printere uden faktisk at slette dem , ændre linje kode, der hedder " objPrinter. Delete_ "til " Wscript. Echo objPrinter. Name . "
  • Running koden sletter alle lokale og netværksprinter genstande fra den lokale computer . Hvis du sletter en printer uforvarende , skal du bruge " Tilføj printer " guiden at geninstallere det .


  • Previous:hvordan man finder ud blækniveauer i en HP printer Next:hvordan du gør din egen midlertidig tatovering fra din printer



     

    Kommentarer

    Code:
    change