How to print My report to the Manual Feed Tray, 3 times?

M

Mita

Hi! I'm a novice @ VBA coding - tryting to get a hang of
this. And I have a challenge.I need a command button on
my Form that will open this report
called "RptPurchaseOrders" and print it to the manual
feed tray 3 times(instead of using a 3-ply-impact
printer, my user wants to be able to feed the 3 different
colored papers in the manual feed herself and print them
with the regular printer that our department uses.)

I have the following code behind the on click event of my
command button "CmdPrint3Times_RptPurchaseOrders".
However, it's not doing exactly what I want it to.

~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
Private Sub CmdPrint3Times_RptPurchaseOrders_Click()

DoCmd.Echo False
' Open the Purchase Order report in Preview mode.
DoCmd.OpenReport "RptPurchaseOrders",
acViewPreview, , "TblPurchaseOrders.PoNumber=" & PONumber
' Print three copies of report.
DoCmd.PrintOut acPages, 1, 1, , 3
DoCmd.Close ' Close the report.
DoCmd.Echo True
End Sub

~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
PLEASE HELP
 
Top