VBA Code to send form to network printer in Access 2000

[briansmithdanisco]

I have tired adding code to send a form to a network printer. The problem I have is the code does not work in Access 2000.

This is the basic set-up I tried, but the compiler did not like the "As Printer" or the "Application.Printer".

Dim prtDefaultPrinter As Printer
Const REPORT_PRINTER As String = "\\ad1\diusk01\newc034"
Set prtDefaultPrinter = Application.Printer
Application.Printer = Application.Printers(REPORT_PRINTER)
DoCmd.PrintOut
Application.Printer = prtDefaultPrinter

Any suggestions?
Thanks.

 

[Remou]

Try this:

http://msdn.microsoft.com/archive/d...umControllingYourPrinterinMicrosoftAccess.asp

 

[briansmithdanisco]

Thanks. I will see if it has what I need.