Pregunta: | 23116 - DETECTAR FINAL DE IMPRESION CON CRYSTAL REPORT |
Autor: | Jose g Montalvo |
Como se puede detectar el final de impresion con crystal report |
Respuesta: | Jose Antonio huerta |
mira lo que yo hago para poder ver si la impresion con crystal termino y se realizo correctamente es lo siguiente:
Reporte = "C:\leyes\CLIENTE\Reportes\progacad.rpt" Impresora = 1 Ventana = 0 resultado% = PEPrintReport(Reporte, Impresora, _ Ventana, Titulo, Izq, _ Top, CW_USEDEFAULT, CW_USEDEFAULT, _ CW_USEDEFAULT, _ 0) resul = PECloseEngine() CrystalReport1.ReportFileName = Reporte CrystalReport1.WindowTitle = Titulo CrystalReport1.Destination = crptToWindow 'result = CrystalReport1.PrintReport If resul <> 0 Then MsgBox CrystalReport1.LastErrorString End If ojala te sirva, =) |