Netzwerkdrucker mit Batch löschen
Ich suche ein Batchscript mit dennen ich alle Netzwerkdrucker von den Pc löschen kann. Alle scripts die ich bisjetzt hier gesehen habe, musste man die Namen kennen.
Leider wurde bei uns auf arbeit etliches umgestellt und man hatte vergessen die Drucker zu entfernen, jetzt möchte ich per anmeldescript/abmeldescript alle Netzwerkdrucker löschen.
Leider sind halt wie gesagt die Namen unbekannt und zuviele Benutzer das mann bei allen das einzeln machen könnte.
Danke schonmal für eure Hilfe
Leider wurde bei uns auf arbeit etliches umgestellt und man hatte vergessen die Drucker zu entfernen, jetzt möchte ich per anmeldescript/abmeldescript alle Netzwerkdrucker löschen.
Leider sind halt wie gesagt die Namen unbekannt und zuviele Benutzer das mann bei allen das einzeln machen könnte.
Danke schonmal für eure Hilfe
Bitte markiere auch die Kommentare, die zur Lösung des Beitrags beigetragen haben
Content-ID: 56315
Url: https://administrator.de/forum/netzwerkdrucker-mit-batch-loeschen-56315.html
Ausgedruckt am: 23.12.2024 um 09:12 Uhr
17 Kommentare
Neuester Kommentar
Hi,
besorge dir die con2prt.exe!! Diese einfach auf das NETLOGON-Verzeichnis legen. Dann im Loginscript wie folgt einbinden:
Mit "/f" werden alle Netzwerkdrucker gelöscht. Falls du die EXE nicht finden solltest, schreibe mir ne PM mit deiner Mail-Addy.
Gruß
Dani
besorge dir die con2prt.exe!! Diese einfach auf das NETLOGON-Verzeichnis legen. Dann im Loginscript wie folgt einbinden:
...
"\\server\netlogon\tools\con2prt.exe" /f
...
Gruß
Dani
Versuch es mal damit:
Kopier den Inhalt in ein Textfile und ändere die Dateiendung auf *.vbs.
In der GPO gibst Du als Skriptparamter "CSCRIPT" mit.
Obacht! Das Script löscht ALLE Netzwerkdrucker. Für die Selektion musst Du schon selber sorgen.
On Error Resume Next
Dim objWMI, wql, objPrt, objPrtDel, objPC
Set objWMI = GetObject("winmgmts:root/CIMV2")
Set objPC = GetObject("winmgmts:\\.")
wql = "Select * from Win32_Printer"
Set objWMI = objWMI.ExecQuery(wql)
For Each objPrinter In objWMI
If instr (1, objPrinter.name,"\\") Then 'Selektion Netzwerkdrucker
Set objPrtDel = objPC.Get("Win32_Printer='" & objPrinter.name & "'")
objPrtDel.Delete_
End If
Next
Dim objWMI, wql, objPrt, objPrtDel, objPC
Set objWMI = GetObject("winmgmts:root/CIMV2")
Set objPC = GetObject("winmgmts:\\.")
wql = "Select * from Win32_Printer"
Set objWMI = objWMI.ExecQuery(wql)
For Each objPrinter In objWMI
If instr (1, objPrinter.name,"\\") Then 'Selektion Netzwerkdrucker
Set objPrtDel = objPC.Get("Win32_Printer='" & objPrinter.name & "'")
objPrtDel.Delete_
End If
Next
Kopier den Inhalt in ein Textfile und ändere die Dateiendung auf *.vbs.
In der GPO gibst Du als Skriptparamter "CSCRIPT" mit.
Obacht! Das Script löscht ALLE Netzwerkdrucker. Für die Selektion musst Du schon selber sorgen.
Versuch es mal damit:
Kopier den Inhalt in ein Textfile und ändere die Dateiendung auf *.vbs.
In der GPO gibst Du als Skriptparamter "CSCRIPT" mit.
Obacht! Das Script löscht ALLE Netzwerkdrucker. Für die Selektion musst Du schon selber sorgen.
On Error Resume Next
Dim objWMI, wql, objPrt, objPrtDel, objPC
Set objWMI = GetObject("winmgmts:root/CIMV2")
Set objPC = GetObject("winmgmts:\\.")
wql = "Select * from Win32_Printer"
Set objWMI = objWMI.ExecQuery(wql)
For Each objPrinter In objWMI
If instr (1, objPrinter.name,"\\") Then 'Selektion Netzwerkdrucker
Set objPrtDel = objPC.Get("Win32_Printer='" & objPrinter.name & "'")
objPrtDel.Delete_
End If
Next
Dim objWMI, wql, objPrt, objPrtDel, objPC
Set objWMI = GetObject("winmgmts:root/CIMV2")
Set objPC = GetObject("winmgmts:\\.")
wql = "Select * from Win32_Printer"
Set objWMI = objWMI.ExecQuery(wql)
For Each objPrinter In objWMI
If instr (1, objPrinter.name,"\\") Then 'Selektion Netzwerkdrucker
Set objPrtDel = objPC.Get("Win32_Printer='" & objPrinter.name & "'")
objPrtDel.Delete_
End If
Next
Kopier den Inhalt in ein Textfile und ändere die Dateiendung auf *.vbs.
In der GPO gibst Du als Skriptparamter "CSCRIPT" mit.
Obacht! Das Script löscht ALLE Netzwerkdrucker. Für die Selektion musst Du schon selber sorgen.
Hi,
Gruß
Dani
aber der erste vorschlag kommt gar nicht infrage, da die exe für unseren Administrator nicht
ersichtlich ist, also wie sie geschreiben wurde.
Wo ist da ein Problem??? Das Tool ist von M$ (Ressource Kit) raus und ist extra für sowas gedacht. Also einfacher kann ich es dir leider nicht mehr machen. Ansonsten bei M$ anrufen. ersichtlich ist, also wie sie geschreiben wurde.
Gruß
Dani