It's part of Windows Scripting Host. Example:

oWNet=CreateObject("WScript.Network")
oWNet.SetDefaultPrinter("printername")

I've not tried it yet so don't know what you have to use as the printer name.

>Hi Nigel!
>Can you explain a bit more.
>What is it "scripting network object" ?
>Thanks
>
>>You can use Set("Printer", 2) to get the default printer name. Then use the scripting network object to set the default printer name.
>>
>>>In my program me need printing from activeX.
>>>ActiveX control always using default windows printer. But need to move
>>>print job to printer fax port.
>>>SET PRINTER TO [NAME] not works for redirect printer job between printers. Maybe anybody know, how set printer as default and return back.
>>>Thanks.
>>>Denis Gavrikov