informes de access a visual basic

xandy
31 de Mayo del 2006
Hola, a todos, soy nueva en esto de los foros, espero que de verdad funcione y reciba muchas respuestas de parte de ustedes, tengo una duda??? se pueden jalar los informes de access a visual basic 6.0????
Gracias x la información que puedan proporcionarme.

alex murcia
31 de Mayo del 2006
Dim strArchivo, acApp
strArchivo = "C:...bddoc.mdb"
' creo un objeto Access
Set acApp = CreateObject("Access.Application")
' abro la base de datos
acApp.OpenCurrentDatabase strArchivo
' Imprimo el informe
acApp.DoCmd.Maximize
acApp.DoCmd.OpenReport "NombreInforme", 0
acApp.Visible = True
' cierro y salgo
acApp.Quit
Set acApp = Nothing