Someone knows this

How in the name of all your gods do you initiate a print preview of an Access report through VB6.

I think something like this was posted recently but unfortunately I missed the reply.

thanks in advance

Bigley

Its OK don't bother rushing in to help, I've solved it. SO for those of you that looked and said I don't know how to do that or something along those lines, here is the code. For those of you who just didn't care about my predicament...shame on you and may your errors be plentiful.


Private Sub Command1_Click()
Dim a As Access.Application

Set a = CreateObject("Access.Application")
a.OpenCurrentDatabase App.Path & "\NWind.mdb"
a.Visible = True
a.DoCmd.OpenReport "Catalog", acViewPreview
a.DoCmd.Maximize

End Sub

Thanks a bunch
Bigley

Well done Bigley - although I thought a clever lad like you could come up with a solution using the Win API or something ;-)

Hehehe!