You can use WSH to do this:
WshNetwork=CreateObject("WScript.Network")
WshNetwork.SetDefaultPrinter("\\Server\Print1")
This is straight conversion from VB code but should work.
>Hi all:
>How can I change the default windows printer using a WIN32API?
>SET PRINTER TO NAME "prt-name" doesn´t change permanently.
>
>TIA