VBScript : Add Printer

PrintServer1 = "\\10.2.0.37\Xerox_Pool_Black"
PrintServer2 = "\\10.2.0.37\Xerox_Pool_Color"
set objNetwork = createobject("Wscript.Network")
objNetwork.AddWindowsPrinterConnection(PrintServer1)
objNetwork.AddWindowsPrinterConnection(PrintServer2)
'**** Make the printer default
objNetwork.SetDefaultPrinter PrintServer1
msgbox("Add Printer Succesfully")

Save text as .vbs

Bookmark and Share

0 comments:

Adsense - Apple - AumJa24 - Blackberry - BlackBerry Enterprise Server - Book - Cocktail - English - Error - Excel - Food - Food for Thought - Gadget - Google - Guitar - Healthy - Ideas - Lotus Domino - Lotus Notes - Lotus Notes Traveler - Lyrics - Meaning of picture - Mozilla - Oracle - Pattaya - Reading - Registry - Sexy - Symbian - Thailand - TOEFL - VBScript - Windows 7 - Windows Vista - Windows XP - Writing - ZyXEL

Powered By AumJa24 http://aumja24-usa.blogspot.com/ http://aumja24-usa.blogspot.com/