Calling Reports

[betto]

Hi again, Im using VB5 and access 97...

..and I have a report made in Access which was named "REPORTE", the databasename is "SBDP.mdb"....

I want to call this report but I got the message. "The report nbae REPORTE you entered is misspelled or refers to a report that isn't open or doesn't exist"... what is not true... the report exist!


Private Sub Command1_Click()

Dim BD As Access.Application
Dim MyReport As Access.Report

Set BD = CreateObject("Access.Application")
BD.OpenCurrentDatabase App.Path & "\SBDP.mdb"

Set MyReport = BD.Reports("REPORTE")

BD.Visible = True
End Sub


..when I run the code, the aplication opens... then shows the message...
.. what's wrong .. i think somenthing(code) is missing...

I hope you can help me... pleeeeeeease


betto :)
betto@mail.com

[Gary.Lowe]

Betto

have you tried using the docmd collection in the Access object.

You can then call the open report method to run your report as you would do in access.

[betto]

Thanx... Gary..

It really worked... and easily..

now, it is for all of you:


Private Sub Command1_Click()

Dim BD As Access.Application
'Dim MyReport As Access.Report

Set BD = CreateObject("Access.Application")
BD.OpenCurrentDatabase App.Path & "\SBDP.mdb"

DoCmd.OpenReport "reporte", acViewPreview 'thats it

'Set MyReport = BD.Reports("reporte")

'BD.Visible = True

End Sub



Thanks friends...

betto :)
betto@mail.com