[AccessD] Access Has Stopped Working!
Rocky Smolin
rockysmolin at bchacc.com
Wed Nov 2 00:37:27 CDT 2016
I'll try that tomorrow. Un-commenting the last two parameters of the
OutputTo didn't change the result. Still barfed.
I assume then after the output to you close the hidden report?
Thx
R
-----Original Message-----
From: AccessD [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of
David Emerson
Sent: Tuesday, November 01, 2016 10:10 PM
To: 'Access Developers discussion and problem solving'; 'List'; 'Off Topic'
Subject: Re: [AccessD] Access Has Stopped Working!
Hi Rocky,
I had a similar situation. I read somewhere that opening the report hidden
first solves the problem
DoCmd.OpenReport " rptRentalAgreement ", acPreview, , , acHidden
DoCmd.OutputTo acOutputReport, "rptRentalAgreement", "PDFFormat(*.pdf)",
strRAPDFName, False ', "", acExportQualityPrint
I also noticed in the second line above (copied from your code) you have a '
after False - this may cause a problem as well.
Regards
David Emerson
Dalyn Software Ltd
Wellington, New Zealand
-----Original Message-----
From: AccessD [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of
Rocky Smolin
Sent: Wednesday, 2 November 2016 5:05 p.m.
To: 'Access Developers discussion and problem solving'; List; 'Off Topic'
Subject: [AccessD] Access Has Stopped Working!
Dear List(s):
I am running an accdb in A2010. I want to convert a report to a pdf and
attach it to an email. This works perfectly on my machine.
At the client site it does not. I spent two hours there today trying
everything I could think of - checking Microsoft update for patches fixes,
updates, etc., decompiling, compact and repair, lacing the code with
DoEvents, running as administrator - nothing worked. I did track the
problematic line of code. It is the line with
DoCmd.OutputTo acOutputReport
And Access Stopped Working on this line of code almost every time. I say
almost because a couple of times it ran - generated both pdfs and popped up
the email with the two report pdfs attached! Which is why I tried the
DoEvents. But it barfed pretty consistently on that first DoCmd.OutputTo
acOutputReport,
Here's the code:
strFrontEndPath = db.Name
Do While Right(strFrontEndPath, 1) <> "\"
strFrontEndPath = Left(strFrontEndPath, Len(strFrontEndPath) - 1)
Loop
strRAPDFName = strFrontEndPath & "RentalAgreement-" _
& Me.cboNameAndAddress.Column(1) & "-" _
& Me.fldRAHOrderNumber & ".pdf"
strRAPDFName = Replace(strRAPDFName, "*", "")
DoCmd.OutputTo acOutputReport, "rptRentalAgreement", "PDFFormat(*.pdf)",
strRAPDFName, False ', "", acExportQualityPrint
'Call ConvertReportToPDF("rptRentalAgreement", , strRAPDFName, , False)
strCCPPDFName = strFrontEndPath & "CreditCardPermission-" _
& Me.cboNameAndAddress.Column(1) & "-" _
& Me.fldRAHOrderNumber & ".pdf"
strCCPPDFName = Replace(strCCPPDFName, "*", "")
DoCmd.OutputTo acOutputReport, "rptCreditCardPermissionForEmail",
"PDFFormat(*.pdf)", strCCPPDFName, False ', "", acExportQualityPrint
'Call ConvertReportToPDF("rptCreditCardPermissionForEmail", , strCCPPDFName,
, False)
You can see the previous legacy code which worked for a long time in A2003 -
the calls to ConvertToPDF - which I have commented out. That doesn't work
anymore.
So I'm really stumped. Has anyone had this problem and found a solution?
Two martinis to the genius who can post an effective fix.
MTIA
Rocky Smolin
Beach Access Software
760-683-5777
<http://www.bchacc.com> www.bchacc.com
<http://www.e-z-mrp.com> www.e-z-mrp.com
Skype: rocky.smolin
--
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
More information about the AccessD
mailing list