Ako odstrániť všetky tlačiarne s VBScript

Windows podporuje niekoľko skriptovacích jazykov , vrátane jazyka Visual Basic Scripting Edition , alebo VBScript . S intuitívnym , anglicky ako syntax , VBScript je jednoduchý jazyk sa učiť . VBScript sám je prostredie vhodné pre mnoho bežných administratívnych úloh , ale jeho vyššia hodnota vychádza z jeho schopnosti komunikovať s ostatnými súčasťami operačného systému , ako je napríklad Windows Management Instrumentation ( WMI Service ) . WMI obchody podrobné informácie o vašom počítači a môžu byť použité v spojení s VBScript sledovať alebo zistiť stav každej komponenty , ktorá zodpovedá normám WMI , vrátane pridávanie alebo mazanie objektov tlačiarne . Veci , ktoré budete potrebovať v Microsoft Windows 2000 alebo novší
Zobraziť ďalšie inštrukcie Cestuj 1

Prihláste sa k počítaču pomocou účtu , ktorý má oprávnenia správcu .

2

Otvorte Poznámkový blok Windows zadaním " Poznámkový blok " do vyhľadávacieho poľa v ponuke " Štart " . Ak používate systém Windows XP , kliknite na tlačidlo " Štart " a potom " Spustiť ... , " typ " notepad " a stlačte tlačidlo " OK " .
3

Kliknite na tlačidlo " Format " v ponuke bar v programe Poznámkový blok , a potom vyberte " Word Wrap " pre prepnutie túto funkciu vypnúť . To umožní , aby váš skript čitateľnejší .
4

Typ strComputer = " . " na prvom riadku súboru . To znamená , že chcete , aby skript spustiť proti lokálnom počítači . Ak chcete spustiť skript na inom počítači a mať príslušné oprávnenie , môžete nahradiť " . " s názvom vzdialeného počítača .
5

Pridajte nasledujúci riadok kódu skriptu . Predtým , než sa môžete pýtať na službu WMI informácie o počítači , VBScript musí najprv pripojiť , alebo sa viažu k tejto službe klipart

Set objWMIService = GetObject ( " winmgmts : { ImpersonationLevel = impersonate } \\ \\ ! " . & StrComputer & " \\ root \\ cimv2 " )
6

Otázka na službu WMI pre zoznam všetkých tlačiarní inštalovaných v lokálnom počítači , a pre každú tlačiareň nájdených , potvrďte odstránenie . Kompletný skript zadaním nasledujúci kód :

Set colPrinters = objWMIService.ExecQuery ( " SELECT * FROM Win32_Printer " )

každý objPrinter v colPrinters

ret = MsgBox ( " Ste si istí , že chcete zmazať nasledovné tlačiarne : " & objPrinter.Name , vbYesNo , " Potvrdiť zmazanie tlačiarne " )

Ak peru = 6 Potom

objPrinter.Delete_

Koniec či

Ďalšie

WScript.Quit
7

Uložte súbor poznámkového bloku s príponou * . VBS , a potom dvakrát kliknite na súbor , ktorý chcete spustiť skript .

• Predchádzajúca strana: Ako skryť stĺpec z FlexGrid v jazyku Visual Basic 6 
• Ďalšia strana: Ako Access VBA e - mailu