If you want to print a report created in MS Access
using your VB application, then its your lucky day.

I've got this in this forum... but forgot the thread no.
or the person who send it. Many of us tried this... and
this really work. here's the code:


' From the book Database Access With VB6
' by Jeffery Mcmanus..
' you need your access ref obj lib

Dim MSACCESS as Access.application

Private Sub PrintReport_Click()

Set MSACCESS = New Access.Application

MSACCESS.OpenCurrentDatabase ("c:\your dir\Your.mdb")
'This opens your db..

MSACCESS.DoCmd.OpenReport "YourReportHere", acViewNormal
'This actualy opens your report from your Access (97?)
'db & then prints it..

MSACCESS.CloseCurrentDatabase ' self explanitory

Set MSACCESS = Nothing
' You need this,
' or you will keep access in memory & lag the user..