Link to home
Start Free TrialLog in
Avatar of JimW
JimW

asked on

‘Print To File’ for Access Reports Under Software Control

    I’m attempting to determine how I can print a Microsoft Access97 Report to a File strictly under software control. By that I mean to print it through a standard printer driver (such as ‘HP LaserJet 4’), but route the output to a file instead of the physical port. If all works as desired the file could later be copied to the port (e.g. COPY FILE.PRT LPT1:) to produce the final output. All of this MUST be done under program control with no user interaction.

     To give you a somewhat larger picture, I have a custom application written in Visual Basic (5.0 EE) which uses Microsoft Access97 to generate a large number of reports. I am in the process of  enhancing the app to interface to a FAX server back-end. My app needs to generate the files described in the previous paragraph to pass to the FAX server to image the pages to be sent over the modem/phone line.

     All of the components run under Windows NT 4.0

     I’ve looked at the Access97 OutputTo, but this is unsuitable, since all graphics are not rendered.

     The Access97 PrintOut method seems similar to the Word97 ‘FilePrint’ method but, unlike the latter, does not support a OutputToFilename argument.

     I’ve tried digging through the SDK documentation of the MSDN library regarding the DEVMODE and DEVNAMES structures, but havn’t found what I’m looking for. I’ve even tried tweaking the prtDEVNAMES structure for Access97 reports by modifying the ‘port’ member of the structure to ‘FILE:’ or the path of a file (e.g. ‘C:\TEST\TEST.PRN’) with no luck. I’ve done similar things with a printer installed which uses the ‘FILE:’ port (which would be ok if it didn’t throw-up a dialog asking the user for a file name!)

     As I said earlier, all functionality must be controllable within software – solutions which rely, for example, on a user entering text (i.e. a filename) into a dialog box will not fly.

     Got any suggestions?
ASKER CERTIFIED SOLUTION
Avatar of cymbolic
cymbolic

Link to home
membership
This solution is only available to members.
To access this solution, you must be a member of Experts Exchange.
Start Free Trial
Avatar of harlanh
harlanh

This ACC97 function uses SendKeys to Check the 'Print to File' box for the currently selected printer and then sends the path and filename to the filename dialog box.  I have used a similar function to select a Linitronic 530 (psuedo) printer to create Postscript (PS) or Encapsulated Postscript (EPS) files.

'------------------------------------------------------------
' PrtEPS(strFN, strRpt)
'
' strFN is path and filename
' strRpt is Report Name from Reports Tab of Database Window
'------------------------------------------------------------
Public Function PrtEPS(strFN As String, strRpt As String)
Dim strCmd As String

strCmd = "%l{ENTER}"
strCmd = strCmd + strFN
strCmd = strCmd + ".PCL{ENTER}"

DoCmd.SelectObject acReport, strRpt, True
SendKeys strCmd, False
DoCmd.RunCommand acCmdPrint

End Function