Scripting - Rinfrescare le impostazioni delle code di stampa da un print Server

Ero nella necessità di far riprendere ai vari cliene le nuove impostazioni riprese dalle code di stampa pubblicate sul print Server.

Volendo spiegare meglio sul print server tutte le stampanti andavano messe, di default, su stampa in grigio.

Per questo avevo bisogno di un .vbs perchè tutti i client prendessero queste impostazioni di default.

Ho risolto con il seguente .vbs:

strComputer = "."

Set objWMIService = GetObject("winmgmts:\\" & strComputer & "\root\cimv2")

Set colPrinters = objWMIService.ExecQuery("Select * From Win32_Printer")

For Each objPrinter in colPrinters

                If InStr(objPrinter.DeviceID, "\\") = 1 Then

                UNCPrinter = objPrinter.DeviceID

                objPrinter.Delete_

                Set WshNetwork = WScript.CreateObject("WScript.Network")

                WshNetwork.AddWindowsPrinterConnection UNCPrinter

                End If

Next

Fonte http://social.technet.microsoft.com/Forums/en-US/winserverprint/thread/a0a9bb3f-db24-417d-9905-c310d068d3c6/