Visual Basic - Como ejecutar Informe de Access desde VB6

Hola, alguien me podra orientar sobre como puedo, desde VB6 ejecutar los informes creados en Access?
Agradeceré cualquier comentario.

Te paso un ejemplo:

Set XL = CreateObject("Access.application")
XL.Opencurrentdatabase FilePath:=PathDB
´si es presentacion preliminar mostramos Access
If AccionInforme = 2 Then XL.Visible = True

´para imprimir directamente, y aplicar un filtro(sentencia WHERE sin el WHERE)
XL.DoCmd.OpenReport Informe, AccionInforme, , sql
If AccionInforme = 2 Then XL.DoCmd.maximize

Set XL = Nothing

Gracias por tu amable ayuda, me funcionó de maravilla. Abusando un poco. sabrás como obtengo la colección de informes?, es para no tener que definir de forma costante cada nombre de reporte, busqué en la ayuda de Access y solo me da otras colecciones.
Saludos y que tengas un buen año nuevo.
Juan Arturo

Va otro ejemplo para rellenar Combo con informes,

db=database

Sub CargarInformes()
Dim ctr As Container, doc As Document, Item As New ValueItem

Set ctr = dbf.Containers!Reports

For Each doc In ctr.Documents
With TDBInfsPorForms.Columns(0).ValueItems
Item.Value = doc.Name
.Add Item
.Translate = False
End With
Next doc

Set ctr = Nothing
End Sub

Procuraré corresponder con el mismo entusiasmo hacia los demás usuarios del foro. Has sido muy amable.
Juan arturo

Hola. Leí tu pregunta de como ejecutar informes de Access desde VB y también leí las respuestas. El problema de las soluciones que te planteaban es que debes tener instalado el Microsoft Access en la máquina en donde instalas tu aplicación.
Hay un control para VB de la empresa VideoSoft que permite mostrar informes de una base de datos "MDB" (microsoft Jet) sin que tengas que tener instalado Access.
Visita http://www.videosoft.com para descargar la versión de prueba del control y para obtener más información.

Chao!!!