ayuda con consulta sql
Publicado por bera (67 intervenciones) el 24/02/2003 12:52:03
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()
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()
Valora esta pregunta


0