Dynamic Connect Printer

Hi There,

I wrote the program in VB6 to connect and remove printer when it needs. It
works fine with XP window but when we moved to Vista window that codes are
not working any more. Anybody has the way to get it works with Vista window.
Here is my coding for connecting printer

CardPrinter = "\\myserver\RM_color"
Set wshNetwork = CreateObject("Wscript.Network")
wshNetwork.AddWindowsPrinterConnection CardPrinter, "HP Color LaserJet 4500"
wshNetwork.SetDefaultPrinter CardPrinter

Set wshNetwork = Nothing

Please any advise.

You will probably need to change the default Point and Print policy on the
client

Point and Print Security on Windows Vista

http://www.microsoft.com/whdc/device...staPnPSec.mspx




--
Alan Morris
Windows Printing Team
Search the Microsoft Knowledge Base here:
http://support.microsoft.com/search/?adv=1

This posting is provided "AS IS" with no warranties, and confers no rights.

"Madison" <Madison@discussions.microsoft.com> wrote in message
news:75BEC0F6-0C8E-4766-95E6-730706B794F6@microsoft.com...
> Hi There,
>
> I wrote the program in VB6 to connect and remove printer when it needs. It
> works fine with XP window but when we moved to Vista window that codes are
> not working any more. Anybody has the way to get it works with Vista
> window.
> Here is my coding for connecting printer
>
> CardPrinter = "\\myserver\RM_color"
> Set wshNetwork = CreateObject("Wscript.Network")
> wshNetwork.AddWindowsPrinterConnection CardPrinter, "HP Color LaserJet
> 4500"
> wshNetwork.SetDefaultPrinter CardPrinter
>
> Set wshNetwork = Nothing
>
> Please any advise.
>