Thanks again for all the replies, ok now trying a slightly altered script,
See below,
If i comment out (on error resume next) I get a overlapping IO script host error on line 18: "" objNetwork.AddWindowsPrinterConnection strUNCPrinter ""
Then it only maps 'laser nul' not the other two,
but if the 'on error resume next' is there it maps all three but sets the wrong default.
Eek !!!
Cant kids use a pen and paper !
Thanks again.
' SetDefaultPrinter.vbs - Windows logon script example
' PrintersDefault.vbs - Set the default printer
' VBScript - to map a network printer
' Author Guy Thomas http://computerperformance.co.uk/
' Version 1.4 - April 24th 2005
' -----------------------------------------------------------------'
Option Explicit
Dim objNetwork, strUNCPrinter, strUNCPrinter1, strUNCPrinter2
strUNCPrinter = "\\pc-bashful\LASER-NUL"
strUNCPrinter1 = "\\pc-bashful\PC-ICT1-COLOUR"
strUNCPrinter2 = "\\pc-bashful\PC-ICT1-MONO"
Set objNetwork = CreateObject("WScript.Network")
objNetwork.AddWindowsPrinterConnection strUNCPrinter
objNetwork.AddWindowsPrinterConnection strUNCPrinter1
objNetwork.AddWindowsPrinterConnection strUNCPrinter2
' Here is where we set the default printer to strUNCPrinter
objNetwork.SetDefaultPrinter strUNCPrinter2
WScript.Quit
' End of Guy's Windows logon example VBScript.