Confirm printing

Tech-Archive recommends: Fix windows errors by optimizing your registry

Hi, I have an order entry system that prints a picking ticket to a network
printer out in the warehouse. Is there any way to confirm the success of the
printing? (aside form physically checking :))

I flag the order as printed but once in a while one fails to print.

Me.date_printed = Now()
stDocName = "OrdPick2"
stLinkCriteria = "order_id =" & Me![order_id]
DoCmd.OpenReport stDocName, , , stLinkCriteria, , dupe
If IsNull(Me.date_emailed) = True Then
sendEmail
Me.date_emailed = Now()
End If


--
Thanks,

MB


.