¿Cómo mostrar reportes de access en vb6?

[Analista]

Tengo una base de datos de Access donde tengo varios reportes diseñados para mi aplicación VB6.

¿Cómo puedo hacer para mostrar los reportes de MS Access en mi aplicación VB6 sin tener que abrir otras ventanas o tener cargado el Access?

¿Existe alguna forma para cargar reportes de access en mi aplicación vb6?

Saludos y bendiciones.

[CID]

No especificaste con que Versión de Access trabajas, podrias probar algo mas o menos asi (automatización):

Código:

Dim objAccess As Object
Set objAccess = CreateObject("access.application")
objAccess.OpenCurrentDatabase "Path a la base de datos"
objAccess.DoCmd.OpenReport "Nombre del reporte", acViewPreview
objAccess.Visible = True
MsgBox "Haga clic en aceptar para cerrar Access"
Set objAccess = Nothing

Y para imprimir, una función:

Código:

Sub imprimirInformeExterno (nomBD As String, nomInforme As String)
    Dim App As Object
    Set App = CreateObject("Access.Application")
    App.OpenCurrentDatabase nomBD
    App.DoCmd.OpenReport nomInforme
    App.CloseCurrentDatabase
    App.Quit
    Set App = Nothing
End Sub

La última función extraida de ésta web.
Ésto es todo lo que puedo decirte, ya no trabajo con Access ni VB6, y cuando los usaba no llegué a utilizar Reportes o Informes con ellos. Quiza otros puedan ayudarte mejor que yo.

Saludos!

[Analista]

Muchas gracias por la respuesta, pero esto me manda a cargar Microsoft Access y me presenta el reporte en la ventana de access.

Yo necesito mostrar el reporte en la misma ventana de mi aplicación de VB6.

[CID]

Te puedo contar como se hacen reportes en otras herramientas, por ejemplo en Delphi, C#, etc.
En estos entornos de desarrollo se utilizan componentes especiales que permiten diseñar, visualizar e imprimir informes o reportes en nuestras aplicaciones.
Son componentes como cualquier otro, con sus metodos y propiedades.
En VB6 tenes algunos para usar, por ejemplo QReports (QuickReports), el cual es un control ActiveX que deberas distribuir con tu aplicación.
Te aclaro que si hiciste un reporte en access, es muy posible que no puedas acceder al mismo desde tu programa en VB6 directamente (por eso te expuse lo de la automatización COM en el post anterior).
Vas a tener que colocar un componente QReports, diseñarlo y pasarle los datos del RecordSet. Es la forma de trabajar de casi todos los componentes del mercado.
Bueno, con estos datos ya podes buscar un poco más de información. Espero que haberte ayudado en algo.
Saludos.