Fjerne netværksprintere i VB script

Set PrinterPath = "\\printserv\MyPrinter"
WshNetwork.RemovePrinterConnection (PrinterPath, true, true)

Skulle vist gøre det :)

vil det så fjerne alle dem som er mappet op imod en bestemt server ?
for der vil være mere end 1 printer som skal slettes!

Nej den djerner kun 1...

Prøv med:

Dim WshNetwork
On error Resume Next
Set WshNetwork = WScript.CreateObject("WScript.Network")
Set oPrinters = WshNetwork.EnumPrinterConnections


For i = 0 to oPrinters.Count - 1 Step 2
    IF InStr(1,oPrinters.Item(i+1), "\\")=1 THEN
        IF InStr(oPrinters.Item(i), "LPT")=1 THEN
            WshNetwork.RemovePrinterConnection oPrinters.Item(i), true, true
        Else
            WshNetwork.RemovePrinterConnection oPrinters.Item(i+1), true, true
        End If
    End If
Next

Burde fjerne alle netværksprintere

Det er ser godt ud jeg vil prøve det af senere, mange tak for din hurtige svar!!!

Jeg giver point når jeg har testet om det virker  ;o)

THANX  ;o)

var skam så lidt :) håber det virker efter hensigten

virkede det?

Totalt I Orden, den fjerner alle netværksprintere!!!!!!!

;o)

(Den  Beholder PDF printere og Microsoft Office Document Image Writer.)

Jeg ved godt det er en gammel tråd, men prøver alligevel:

Vi har skiftet print-server, og vil gerne fjerne alle printerene fra den gamle server, ude på brugernes PC'er (ikke dem fra den nye).

Nr. 2 Script, som mcgoat skriver - vil den fjerne ALLE netværks printere, eller kun de gamle, som ikke længere har forbindelse?