Somanth Hawargi,
You can use this code to change default printer dynamically.
Environment env
GetEnvironment(Env)
String ls_default // default printer name has to be assigned
String sDevice
Integer li_rtn
Choose Case Env.Ostype
Case WindowsNT!
li_rtn = RegistrySet("HKEY_CURRENT_USER\Software\Microsoft\Windows
NT\CurrentVersion\Windows","Device",ls_default)
Case Windows!
sDevice = ProfileString("win.ini", "Devices", ls_default,"")
li_rtn =
setprofilestring("win.ini","windows","device",ls_default+','+sDevice)
End Choose
Regards.
PUNNIARAJ,T
DSQ Software Pte Ltd, Singapore
> [EMAIL PROTECTED] HOSTED BY IIGG, INC. FOR HELP WITH LIST SERVE COMMANDS, ADDRESS
> A MESSAGE TO [EMAIL PROTECTED] WITH THE FOLLOWING MESSAGE: help pfcsig
> SEND ALL OTHER INQUIRES TO [EMAIL PROTECTED]
