Read the Device value from HKEY_CURRENT_USER\Software\Microsoft\Windows NT\CurrentVersion\Windows - this is the default printer.
 Code:
$DPrinter = ReadValue('HKEY_CURRENT_USER\Software\Microsoft\Windows NT\CurrentVersion\Windows', 'Device')
Glenn
_________________________
Actually I am a Rocket Scientist! \:D