Hi All

 

I have a network with 12 workstations etc and 16 users all with roaming profiles.

 

The profiles work great in all aspects but one, printers.

 

The network has 3 printers shared from the back of 3 workstations workstations, all workstations have a script that runs on bootup that maps all available network printers and sets a default printer (the one most conveniently placed for that particular workstation)

 

Problem;

 

(1) If a user logs onto a workstation that does NOT have a locally attached printer, the printers are setup correctly, the default printer for the workstation in question is also set correctly.

(2) If that user now logs off and moves to a workstation that does have a locally connected printer, the script runs, adds the printers as expected, but the default printer is not set to the locally attached printer. The default printer is usually set to the last default printer configured in (1) above.

 

This is fustrating the users as they have to play hunt the printout from time to time.

 

this is pretty much the sort of script being used:-

 

Option Explicit
Dim objPrinter
Set objPrinter = CreateObject("WScript.Network")
objNetwork.AddWindowsPrinterConnection strUNCPrinter1

objNetwork.AddWindowsPrinterConnection strUNCPrinter2

objNetwork.AddWindowsPrinterConnection strUNCPrinter3

objNetwork.SetDefaultPrinter .................

Set objPrinter = Nothing

How can I set the local printer to be default.

 

Note:- yes, the printers are switched on as are the workstations.

 

Ideally it would be nice to have the printers configured on each workstation and that configuration to NOT be affected by who logs on.

 

Hope this makes sense.

 

Cheers in advance for any ideas.

Hi Paul,

 

I don't really know the cause of this but it would be a lot easier if those printer were 'real' networked printers.

Yes it would make life so much easier if they were network capable or on a network print server device.

Unfortunatley as usual customers dont want to spend any sort of money, tight budgets etc.

 

If I resolve the issue then I will post an answer.

 

Thanks for replying 

OK

 

The default print is being set correctly now regardless of whether it is connected directly or over a network.

 

Not sure if the variable had to be defined and then set to the default printer name, but at the end of the day it worked for me.

 

so the final script looks something like this

 

Option Explicit
Dim objPrinter, strUNCPrinter
Set objPrinter = CreateObject("WScript.Network")

strUNCPrinter = "local printer name"
objNetwork.AddWindowsPrinterConnection "\\computer1\printer1"

objNetwork.AddWindowsPrinterConnection "\\computer2\printer2"
objNetwork.AddWindowsPrinterConnection "\\computer3\printer3"
objNetwork.SetDefaultPrinter strUNCPrinter
Set objPrinter = Nothing

 

This worked for me, to be honest I dont know why I had issues having the default printer line as

objNetwork.SetDefaultPrinter "local printer name"

but for some reason, maybe even a typo on my part, but I couldnt get it to work at the time.

 

Many thanks for infromation provided from the website http://computerperformance.co.uk/

the guy's scripts.....

 

Of course the machines that have a local printer attached must be switched on before the others in the network, something that I have told my client repeatedly....

 

Cheers, I guess this issue can be closed now as far as I am concerned