Reportes en Crystal y VB6 no se imprimen
Publicado por Edgar Lizarraga (1 intervención) el 11/04/2013 20:41:54
Hola, mi problema es el siguiente:
Me pasaron una aplicación (un checador de horario de trabajadores, para ser mas especifico) hecha en Visual Basic 6, la cual genera reportes de asistencia, faltas, etc, hechos en Crystal Reports 8.5.
El problema viene al momento de imprimir el reporte. Ya que no me muestra el reporte para empezar, es decir, no me muestra como es que quedara el reporte antes de imprimirse, segundo, suponiendo que sale bien el reporte al momento de mandarse imprimir aparece en la cola de impresión de la impresora, pero ahí se queda un rato pero no se imprime. Solo muestra la leyenda imprimiendo y nunca sale nada de la impresora.
Como nunca he utilizado estas herramientas para imprimir reportes, no se la verdad que pueda estar mal, o si es problema con el código de VB, por eso lo pongo a continuación:
Código que se ejecuta al momento de mandar imprimir desde la aplicación.
Asistencia.DataFiles(0) = "Ruta base de datos"
Asistencia.ReportFileName = "Ruta archivo reporte crystal - Reporte.rpt"
Asistencia.Destination = crptToPrinter
Asistencia.PrintReport
Saludos. Y espero que puedan ayudarme.
Gracias.
Me pasaron una aplicación (un checador de horario de trabajadores, para ser mas especifico) hecha en Visual Basic 6, la cual genera reportes de asistencia, faltas, etc, hechos en Crystal Reports 8.5.
El problema viene al momento de imprimir el reporte. Ya que no me muestra el reporte para empezar, es decir, no me muestra como es que quedara el reporte antes de imprimirse, segundo, suponiendo que sale bien el reporte al momento de mandarse imprimir aparece en la cola de impresión de la impresora, pero ahí se queda un rato pero no se imprime. Solo muestra la leyenda imprimiendo y nunca sale nada de la impresora.
Como nunca he utilizado estas herramientas para imprimir reportes, no se la verdad que pueda estar mal, o si es problema con el código de VB, por eso lo pongo a continuación:
Código que se ejecuta al momento de mandar imprimir desde la aplicación.
Asistencia.DataFiles(0) = "Ruta base de datos"
Asistencia.ReportFileName = "Ruta archivo reporte crystal - Reporte.rpt"
Asistencia.Destination = crptToPrinter
Asistencia.PrintReport
Saludos. Y espero que puedan ayudarme.
Gracias.
Valora esta pregunta
0