Print Report function working in adp format but is not working in ade

[Kabethy]

Hi Everyone,



I am new in access, maybe this has a very simple answer. I had to migrate this function previously in access 2000 to access 2010 while working with adp's all works fine but when I convert my adp's into adp's the very simple steps shown below dont work anymore and I get the error


Error #28557

* The expression may not result in the name of a macro,
the name of a user-defined function, or [Event Procedure].
* There may have
been an error evaluating the function, event, or macro.


Private Sub cmdPrint_Click()
Dim strDryCleaningParameters As String
DoCmd.Echo False

strDryCleaningParameters = gobjTicket.gstrLaundryNumber

SetDryCleaningReportParameters "rptWwLaundryDryCleaningPrintTickets", strDryCleaningParameters
DoCmd.OpenReport "rptWwLaundryDryCleaningPrintItemTickets", 2

DoCmd.PrintOut

DoCmd.Close acReport, "rptWwLaundryDryCleaningPrintItemTickets", acSaveYes

' Set echo as it was
DoCmd.Echo True
End Sub

What am I getting wrong? I tried also without Print out and although no error is triggered no print is coming out =( when pressing the button I receive a quick screen saying printing but then nothing is printed. Any idea?

Private Sub cmdPrint_Click()
Dim strDryCleaningParameters As String

strDryCleaningParameters = gobjTicket.gstrLaundryNumber

SetDryCleaningReportParameters "rptWwLaundryDryCleaningPrintTickets", strDryCleaningParameters
DoCmd.OpenReport "rptWwLaundryDryCleaningPrintItemTickets", acViewNormal

End Sub

[rpeare]

Where is it breaking?

Put in a bunch of debug.print statements i.e.:

debug.print "Set srtDryCleaningParameters" after that variable is set
debug.print "Opened report" after the first report is opened

You can also put in some error trapping

ON ERROR GOTO ErrorHandler

<Your code here>

exit sub

ErrorHandler:
Debug.print err.number & " " & err.description

end sub

and see what that tells you.

[Kabethy]

Hi Guysthanks for your tips I found the problem basically I forgot to migrate the stored procedure that my report was calling. but nice tips to debug.

Hi Everyone,

I am new in access, maybe this has a very simple answer. I had to migrate this function previously in access 2000 to access 2010 while working with adp's all works fine but when I convert my adp's into adp's the very simple steps shown below dont work anymore and I get the error


Error #28557

* The expression may not result in the name of a macro,
the name of a user-defined function, or [Event Procedure].
* There may have
been an error evaluating the function, event, or macro.


Private Sub cmdPrint_Click()
Dim strDryCleaningParameters As String
DoCmd.Echo False

strDryCleaningParameters = gobjTicket.gstrLaundryNumber

SetDryCleaningReportParameters "rptWwLaundryDryCleaningPrintTickets", strDryCleaningParameters
DoCmd.OpenReport "rptWwLaundryDryCleaningPrintItemTickets", 2

DoCmd.PrintOut

DoCmd.Close acReport, "rptWwLaundryDryCleaningPrintItemTickets", acSaveYes

' Set echo as it was
DoCmd.Echo True
End Sub

What am I getting wrong? I tried also without Print out and although no error is triggered no print is coming out =( when pressing the button I receive a quick screen saying printing but then nothing is printed. Any idea?

Private Sub cmdPrint_Click()
Dim strDryCleaningParameters As String

strDryCleaningParameters = gobjTicket.gstrLaundryNumber

SetDryCleaningReportParameters "rptWwLaundryDryCleaningPrintTickets", strDryCleaningParameters
DoCmd.OpenReport "rptWwLaundryDryCleaningPrintItemTickets", acViewNormal

End Sub

[vscntkX]

Cung nhau tang toc nhung ngay cuoi nam.
Co gang len anh em trong dien dan.
Chuc mua xuan hanh phuc.