yo uso lo siguiente para accesar a un reporte de con access.
estoy usando el crviewer
Global Appl As New CRAXDRT.Application
Global Report As New CRAXDRT.Report
Set Report = Appl.OpenReport(<<Ruta y nombre del reporte>>)
For nI = 1 To Report.Database.Tables.Count
Report.Database.Tables.Item(nI).SetLogOnInfo "", <<ruta y nombre de bd>>, <<usr>>, <<pwd>>
Report.Database.Tables.Item(nI).SetTableLocation <<ruta y nombre de bd>>, <<Nombre del reporte>>, ""
Next
Report.DiscardSavedData
crvReporte.ReportSource = Report
crvReporte.ViewReport
While crvReporte.IsBusy
DoEvents
Wend
crvReporte.Zoom 100
y tiene muchas mas opciones
me puedes localizar en el msn de yahoo mi nick es cfpd2k |
