Reporte con Crystal
Publicado por Sebas (2 intervenciones) el 20/11/2005 05:51:07
Estoy jalando desde Visual Basic 6.0 un reporte hecho en Crystal 8.0 con mis datos de una base de Access sin contraseña. Al desplegar el reporte me sale el mensaje "El servidor aún no ha sido abierto" y no me actualiza los datos del reporte. El código que estoy usando es el siguiente:
Private Crystal As New CRAXDRT.Application
Private Reporte As New CRAXDRT.Report
Private Sub Form_Load()
Set Reporte = Crystal.OpenReport(App.Path & "\Ventas7.rpt")
Reporte.DiscardSavedData 'Pide datos inicialmente
CRViewer.ReportSource = Reporte
CRViewer.ViewReport
End Sub
El que me pueda ayudar lo agradezco desde ya.
Private Crystal As New CRAXDRT.Application
Private Reporte As New CRAXDRT.Report
Private Sub Form_Load()
Set Reporte = Crystal.OpenReport(App.Path & "\Ventas7.rpt")
Reporte.DiscardSavedData 'Pide datos inicialmente
CRViewer.ReportSource = Reporte
CRViewer.ViewReport
End Sub
El que me pueda ayudar lo agradezco desde ya.
Valora esta pregunta
0