informe de access en vb6?

[Say_No_More]

HOla se pude ver e imprimir un informe de una base de datos hecho en access desde vb6?
pregunto porque la verdad es que los datareports no me convencen mucho y si se pudiera hacer esto seria mucho mas facil....
salu2

[jc_moty]

Claro que si se puede, el codigo queda asi:

Código:

Dim appAccess As Object
Set appAccess = CreateObject("Access.Application")
appAccess.OpenCurrentDatabase "Ruta de la Base de Datos"
appAccess.DoCmd.OpenReport "Nombre del Reporte", , , "Condicion para Imprimirlo"
' Ejemplo: Imprimir la factura #100:
appAccess.DoCmd.OpenReport "factura", , , "nfactura=100"

Espero te sirva
Saludos