Visual Basic - ayuda con Problema al momento de imprimir un reporte en VB6

Life is soft - evento anual de software empresarial
 
Vista:
sin imagen de perfil
Val: 48
Ha aumentado su posición en 4 puestos en Visual Basic (en relación al último mes)
Gráfica de Visual Basic

ayuda con Problema al momento de imprimir un reporte en VB6

Publicado por seba64 (23 intervenciones) el 05/03/2020 12:07:59
Saludos:

Tengo este problema al cual ya llevo mucho tiempo y no he podido resolver, ojala me puedan ayudar a descubrir cual es el problema. He creado un programa que dentro de sus múltiples funciones debe genera varios informes con distintos parámetros. los informes consisten en listados de datos, generados a través de distintas consultas, que se muestran en pantalla. Los informes, no las consultas. En la pantalla aparece un botón que permite imprimir el listado. Al presionar el botón se muestra la vista previa del informe y un mensaje de confirmación. El botón llama a un report y lo imprime sin problema. Sin problema la primera vez, porque al presionar el botón de imprimir nuevamente aparece un mensaje de error señalando que el campo no se encuentra en el reporte. De hecho, huce pruebas y no encuentra ningún datafield.

Esto eslo que hace el botón imprimir:

1
2
3
4
5
6
7
8
9
10
11
' Codigo del botón imprimir
DataReport4.RightMargin = 0
DataReport4.LeftMargin = 0
DataReport4.Sections(1).Controls("fecha").Caption = Date
DataReport4.Sections(1).Controls("linea1").Caption = "Ventas mensuales ordenadas por fecha"
Set DataReport4.DataSource = rs
DataReport4.Refresh
DataReport4.Show modal, Me
n = MsgBox("Desea imprimir este informe", vbYesNo, "Impresión de informe")
If n = 6 Then DataReport4.PrintReport
DataReport4.Hide

Y el mensaje de error dice que no se encontra el datafield 'documento' con el número de error 8526

Decir que este es el Datareport4, que el código es casi idéntico que el del Datareport3 y el diseño de este reporte es copiado del Datareport3, pero con menos campos y en resumen que el problema es que no encuentra los datafields al intentar imprimir por segunda vez este Datareport, con los demás no ocurre esto. y aclarar que el mensaje de error aparece en las líneas del .refresh y del .printReport, pero no en la línea donde se muestra .show modal.

Agradezco de antemano cualquier idea, ayuda y comentario.
Valora esta pregunta
Me gusta: Está pregunta es útil y esta claraNo me gusta: Está pregunta no esta clara o no es útil
0
Responder
Imágen de perfil de Andres Leonardo
Val: 4.001
Oro
Ha mantenido su posición en Visual Basic (en relación al último mes)
Gráfica de Visual Basic

ayuda con Problema al momento de imprimir un reporte en VB6

Publicado por Andres Leonardo (1674 intervenciones) el 05/03/2020 15:09:56
Solo por curiosidad yo lo que haria, es poner un ""& Campo

Pareceria que no acepta el campo nulo
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar
sin imagen de perfil
Val: 48
Ha aumentado su posición en 4 puestos en Visual Basic (en relación al último mes)
Gráfica de Visual Basic

ayuda con Problema al momento de imprimir un reporte en VB6

Publicado por seba64 (23 intervenciones) el 07/03/2020 06:32:55
No entiendo, ¿Donde pongo lo que dices?


Acaso lo dices por el código de error??????

El campo documento es clave primaria, nunca está nulo.
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar
Imágen de perfil de Andres Leonardo
Val: 4.001
Oro
Ha mantenido su posición en Visual Basic (en relación al último mes)
Gráfica de Visual Basic

ayuda con Problema al momento de imprimir un reporte en VB6

Publicado por Andres Leonardo (1674 intervenciones) el 09/03/2020 14:50:46
Me refiero al Recorset

Set DataReport4.DataSource = rs

ese debe tener una consulta, cuando hagsas la consulta verifica los campos resultados para ver si alguno es nulo
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar