I have a vb6 app that uses crystal reports 8.5. We have the application install on our production floor, the problem that we keep running into is when I have the user print they go through a series of vb "yes/no" boxes verifing input. Then I automatically print out 3 copies of my report.
The problem is when it goes to print crystal pops up a status box saying
------------------------------
"Printing Records"
Copy 3
Printing Page 1 of 3
(CANCEL PRINT) button
------------------------------
the problem occurs when the users keep pressing enter to quickly go through the verification boxes, and they accidentally hit enter when the "cancel print" dialog appears.
I'm wondering if there is any way to disable this from within crystal or vb6.
the code I use to print the report is:
==============================================
'set up report
CrystalReport1.ReportFileName = App.Path & "\PWMS_Pallet_Tag.rpt"
CrystalReport1.ParameterFields(0) = "PalletIDTagInput;" & palletTagID & ";TRUE"
CrystalReport1.ParameterFields(1) = "ShiftCounter;" & shiftCounter & ";TRUE"
'print report here
CrystalReport1.CopiesToPrinter = 3
CrystalReport1.Destination = crptToPrinter
CrystalReport1.action = 1
Thanks for any help
The problem is when it goes to print crystal pops up a status box saying
------------------------------
"Printing Records"
Copy 3
Printing Page 1 of 3
(CANCEL PRINT) button
------------------------------
the problem occurs when the users keep pressing enter to quickly go through the verification boxes, and they accidentally hit enter when the "cancel print" dialog appears.
I'm wondering if there is any way to disable this from within crystal or vb6.
the code I use to print the report is:
==============================================
'set up report
CrystalReport1.ReportFileName = App.Path & "\PWMS_Pallet_Tag.rpt"
CrystalReport1.ParameterFields(0) = "PalletIDTagInput;" & palletTagID & ";TRUE"
CrystalReport1.ParameterFields(1) = "ShiftCounter;" & shiftCounter & ";TRUE"
'print report here
CrystalReport1.CopiesToPrinter = 3
CrystalReport1.Destination = crptToPrinter
CrystalReport1.action = 1
Thanks for any help