Changing DefaultPrinter in Access 97

  • Thread starter Thread starter Alex
  • Start date Start date
A

Alex

I wish to be able to change the default printer etc using
Access97, it appears I can do this using the printer
object in Access XP is there a simply facility in Access
97.
 
In a2002 and later you can use:

So, to save/switch, you can use:

dim strDefaultPrinter as string

' get current defualt printer.
strDefaultPrinter = Application.Printer.DeviceName

' swtich to printer of your choice:

Set Application.Printer = Application.Printers("HP LaserJet Series II")

do whatever.

'Swtich back.

Set Application.Printer = Application.Printers(strDefaultPrinter)

For a97, you can use my simple code at:

http://www.attcanada.net/~kallal.msn/msaccess/msaccess.html
 
Back
Top