--------------不要复制此行-----------------
On Error Resume Next
Set WshNetwork = WScript.CreateObject("WScript.Network")
'Add the network printer 1 & 2
WshNetwork.AddwindowsPrinterConnection "\\printerserver\printer1"
WshNetwork.AddwindowsPrinterConnection "\\printerserver\printer2"
'Remove the printer 3 which not existing on domain
'WshNetwork.RemovePrinterConnection "\\printerserver\printer3"
'Default printer1
WshNetwork.SetDefaultPrinter "\\printerserver\printer1"
------------不要复制此行-----------------