Programación General > Visual Basic 6.0 e inferiores

 Re: ayuda con CRViewer

(1/1)

bera:
soy nuevo con el CRViewer y necesito ayuda. Resulta que cuando intento visualizar el informe me da el mensaje de error: File not found. La ventana del informe se abre pero no muestra ningun dato.
la consulta funciona bien ya que en el recordset tengo los datos que quiero en el informe. este es el codigo

Dim Reporte As New infFiniquitos
Dim rs As New ADOR.Recordset

Private Sub Form_Load()


rs.Open "SELECT * FROM SINIESTROS_FINIQUITO , SINIESTROS_LINEAS_FINIQUITO WHERE SINIESTROS_FINIQUITO.EXPEDIENTE = " & frmGestionSiniestros.txtExpediente & "", "Gestion"


Reporte.Database.SetDataSource rs
CRViewer1.ReportSource = Reporte
CRViewer1.ViewReport

End Sub

Private Sub Form_Resize()
CRViewer1.Top = 0
CRViewer1.Left = 0
CRViewer1.Height = ScaleHeight
CRViewer1.Width = ScaleWidth
End Sub

J.M.Movilla:
No sé si será la solución, pero detrás de la instrucción "rs.Open "SELECT..." echo en falta
rs.Refresh
Y a continuación yo te aconsejo que pongas una pausa de 1-2 segundos antes de aplicar este recordset al reporte.

A ver si he acertado, ojalá...

Navegación

[0] Índice de Mensajes