Printing two copies with different footer on each

[donsi]

Hello,

Self teaching VBA and Access. So not a pro on either.

somehow I was able to manage have access print two copies of the report, but now I would like to have two footers on both copies, one should say "Original" and 2nd "Duplicate". How could it be done. Searched online but couldn't find the VBA guide. Here is the code I am using to print two copies.

DoCmd.OpenReport "RptBankFrm", acViewPreview, "", "[IssFormNo]=[Forms]![NavigationForm]![NavigationSubform]![IssFormNo]", acNormal
            DoCmd.PrintOut , , , , 2
            DoCmd.Close acReport, "RptBankFrm"

 

[pbaldy]

I would use 2 OpenReport lines, without the preview argument. Use the OpenArgs argument to pass your 2 different texts. In the reports open event, use OpenArgs to set a textbox.