Tek-Tips is the largest IT community on the Internet today!
Members share and learn making Tek-Tips Forums the best source of peer-reviewed technical information on the Internet!
-
Congratulations Mike Lewis on being selected by the Tek-Tips community for having the most helpful posts in the forums last week. Way to Go!
Use Microsoft Access Report In VB
- Thread starter tkyap
- Start date
First go to Project>>References, and select Microsoft Access 8.0 Object Library, or whatever the most current version is. Then do this
Dim objAccess As New Access.Application
Set objAccess = CreateObject("Access.Application"
objAccess.OpenCurrentDatabase ("C:\dbname.mdb"
objAccess.DoCmd.OpenReport "reportname",acViewPreview
'use acViewPreview or it will print right away
objAccess.DoCmd.Maximize
objAccess.CloseCurrentDatabase
Set objAccess = Nothing
Dim objAccess As New Access.Application
Set objAccess = CreateObject("Access.Application"
objAccess.OpenCurrentDatabase ("C:\dbname.mdb"
objAccess.DoCmd.OpenReport "reportname",acViewPreview
'use acViewPreview or it will print right away
objAccess.DoCmd.Maximize
objAccess.CloseCurrentDatabase
Set objAccess = Nothing
- Status
Similar threads
