Hola, tengo el siguiente problema, tengo que generar un reporte con crystal reports 9 tomando datos que genero desde visual basic 6 en una tabla access 2003...
el tema es que al llamar al roporte, me lo muestra vacío, pero si yo examino campo por campo si me muestra la información que debería mostrar...
Les paso el código sobre como llamo al reporte, que lo extraje de las FAQ's de Foros del Web...
Código:
Dim crystal As CRAXDRT.Application
Dim Report As CRAXDRT.Report
Private Sub Form_Load()
Set cnn = New ADODB.Connection
Set rst_lee = New ADODB.Recordset
cnn.Open "Provider=Microsoft.Jet.OleDB.4.0; Data Source=" & App.Path & "\BASES\Presupuestos.mdb"
With rst_lee
.CursorLocation = adUseClient
.CursorType = adOpenStatic
.LockType = adLockPessimistic
End With
CRViewer.DisplayBorder = False
CRViewer.DisplayTabs = False
CRViewer.EnableDrillDown = False
CRViewer.EnableRefreshButton = False
If rst_lee.State = adStateOpen Then rst_lee.Close
rst_lee.Open "SELECT Datos_tempo.*, Detalle_tempo.*, Dolar.dolar FROM datos_tempo, detalle_tempo, dolar", cnn
Set crystal = New CRAXDRT.Application
Set Report = crystal.OpenReport(App.Path & "\Reportes\rep_presupuesto.rpt")
Report.DiscardSavedData
Report.Database.SetDataSource rst_lee
CRViewer.ReportSource = Report
CRViewer.ViewReport
Do While CRViewer.IsBusy
DoEvents
Loop
CRViewer.Zoom 100
rst_lee.Close
End Sub
No se porque no me lo levanta, es con el segundo sistema que me tira este error... con el anterior cambie a DataReport, pero no me gusta en lo mas minimo... este quisiera hacerlo con Crystal... espero alguna respuesta... por favor... Gracias!