Carolyn Johnson
cjlabs at att.net
Mon Feb 21 10:40:33 CST 2011
I don't know that I have anything useful to add to this discussion, but I have been using this code for a long time without problems. There was an update a couple of years ago with new .dll files -- 2009. I call this code in several places using blRet = ConvertReportToPDF(strReportName, vbNullString, myPath & "Results.pdf", False, False) blRet is a boolean declared in each sub where I call ConvertReportToPDF. I don't do anything with it, but this is how the version I got was done. I did have an issue with using in Access2010 because the snapshot format is no longer available. I now have code to check the Access version and if it's 2010, I create the pdf using the built-in PDF converter. Otherwise, the database uses the code above. Carolyn Johnson St Louis, MO > > > -----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/> >