Rocky Smolin
rockysmolin at bchacc.com
Fri Feb 18 10:46:17 CST 2011
Lambert: Thanks for the idea but it didn't seem to make any difference. Still does not return to the next statement after the OutputTo. But if I run the ConvertToPDF in the other form first, then it works when called from the second form. Very mysterious. Rocky -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Heenan, Lambert Sent: Friday, February 18, 2011 7:07 AM To: Access Developers discussion and problem solving Subject: Re: [AccessD] FW: Convert To PDF Problem Hi Rocky, I honestly cannot remember how I worked this out, but I too had some problems when I first started to use the wondrous LeBans code for PDF production. For some reason it did not work unless the database window was (nominally) visible. I resolved the issues by adding a few lines of code around those two lines. Lambert Leban's original code... ========================================== ' Export the selected Report to SnapShot format DoCmd.OutputTo acOutputReport, RptName, "SnapshotFormat(*.snp)", _ strPathandFileName ' Make sure the process has time to complete DoEvents ========================================== Here is my modified code. The additons are lines 200,210,230, 240 and 250. ========================================== ' Export the selected Report to SnapShot format 200 DoCmd.Echo False 'Show the db window 210 DoCmd.SelectObject acTable, , True 220 DoCmd.OutputTo acOutputReport, RptName, "SnapshotFormat(*.snp)", _ strPathandFileName 230 DoCmd.SelectObject acTable, , True 240 DoCmd.RunCommand acCmdWindowHide 'turn the echo back on 250 DoCmd.Echo True ' Make sure the process has time to complete 260 DoEvents ========================================== -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Rocky Smolin Sent: Thursday, February 17, 2011 1:59 AM To: 'Access Developers discussion and problem solving' Subject: Re: [AccessD] FW: Convert To PDF Problem Michael: I'm using Lebans' ConvertReportToPDF which is a Public Function and is included in a module named modReportToPDF which you can download form his site. This function is called from two places in the app and is called like this: Call ConvertReportToPDF("rptRentalAgreement", , strRAPDFName, , False) So there are no declares in either of the two forms that call ConvertReportToPDF. However, in Lebans' module here are a bunch of Private Declares. There are no duplicates of these Declares in other modules, however, public or otherwise. Is that what I'm looking for? TIA Rocky -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Michael Mattys Sent: Wednesday, February 16, 2011 9:00 PM To: 'Access Developers discussion and problem solving' Subject: Re: [AccessD] FW: Convert To PDF Problem Hi Rocky, No, quite familiar actually. My turn to be vague ... You'll need to examine those declares again. One or more of your declares is being called by your form/report because it is public and is probably a duplicate of a private declare that your code should be using. Even though they look the same, they are not - hence no functionality. Michael R Mattys Business Process Developers www.mattysconsulting.com -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Rocky Smolin Sent: Wednesday, February 16, 2011 11:40 PM To: 'Access Developers discussion and problem solving' Subject: [AccessD] FW: Convert To PDF Problem So here's what I've found out so far. The Convert to PDF routine is called form two places in the program, one which has been working a long time - call it the old one - and the new one I added. If the new one is run before the old one, it stops executing at DoCmd.OutputTo acOutputReport, RptName, "SnapshotFormat(*.snp)", _ strPathandFileName Just never returns from this command. Doesn't hang, you can go ahead and operate on the form. But contorl is never passed to the next statement. However, if you call the old one first, then the new one works. So the old one is apparently setting something somewhere that makes the new one work. But I can't see it to save my soul. Pretty vague, huh? But all WAGs welcome. MTIA Rocky Smolin Beach Access Software 858-259-4334 Skype: rocky.smolin www.e-z-mrp.com www.bchacc.com -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Rocky Smolin Sent: Tuesday, February 15, 2011 11:50 AM To: 'Access Developers discussion and problem solving' Subject: [AccessD] Convert To PDF Problem Dear List: I implemented Lebans' ConvertReportToPDF and it worked really well to create a report as a PDF. Then I implemented in another place in the code. And it doesn't work. Same Call. Passing the same parameters. I step through Lebans' code line by line, watching all the variables. When it gets to the line ' Export the selected Report to SnapShot format DoCmd.OutputTo acOutputReport, RptName, "SnapshotFormat(*.snp)", _ strPathandFileName it doesn't comes back to the next line. And no SNP file is created. The next line is: ' Make sure the process has time to complete DoEvents Stepping through the code when called from the place I first used it it steps just fine. Does the output, creates the snp file and lights up the DoEvents. The header is to the module is: Public Function ConvertReportToPDF( _ Optional RptName As String = "", _ Optional SnapshotName As String = "", _ Optional OutputPDFname As String = "", _ Optional ShowSaveFileDialog As Boolean = False, _ Optional StartPDFViewer As Boolean = True, _ Optional CompressionLevel As Long = 0, _ Optional PasswordOwner As String = "", _ Optional PasswordOpen As String = "", _ Optional PasswordRestrictions As Long = 0, _ Optional PDFNoFontEmbedding As Long = 0 _ ) As Boolean and the arguments passed to the routine are the same in both cases. I am truly baffled - don't even have a clue what to test. Any ideas, WAGs even, gratefully accepted. MTIA Rocky Smolin Beach Access Software 858-259-4334 Skype: rocky.smolin www.e-z-mrp.com <http://www.e-z-mrp.com/> www.bchacc.com <http://www.bchacc.com/> -- AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com -- AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com -- AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com -- AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com -- AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com