Netzwerkdrucker unter Windows 7 per Script entfernen

Nach endlosen Versuchen, einen nicht mehr verfügbaren Netzwerkdrucker automatisch per Script (GPO) zu löschen, hier ein funktionierendes VBS-Script, das mit Userrechten (und dadurch als User Logon Script) funktioniert.

Das Script bildet quasi das Gegenstück zu meinem Script über Windows Drucker Deployment

(Quelle: https://community.spiceworks.com/scripts/show/55-delete-multiple-printers)

'Begin Script
'Remember to edit the  printer address variables of strPrinter1 and strPrinter2 
'as well as the strComputer field

strComputer = "."
strPrinter1 = "\\server\Laserdrucker 1"
strPrinter2 = "\\server\Laserdrucker 2"

Set objWMI = GetObject("winmgmts:\\" & strComputer & "\root\cimv2")  
Set colPrinters = objWMI.ExecQuery("Select * From Win32_Printer")  

For Each objPrinter in colPrinters  
  on error resume next  
  If Lcase(objPrinter.name) = Lcase(strPrinter1) Then  
    Set objNetwork = CreateObject("Wscript.Network")  
    objNetwork.RemovePrinterConnection strPrinter1  
  Else  
    If Lcase(objPrinter.name) = Lcase(strPrinter2) Then  
      Set objNetwork = CreateObject("Wscript.Network")  
      objNetwork.RemovePrinterConnection strPrinter2  
    End If  
  End If  
Next

'End Script