MS Access Reports

[Hollie]

Hi,

Different Q this time....

I can know run access reports from VB but what I would like to do is offer the user a choice from the available ones.

If I know all the reports then I can just fill up a list box and open the selected one but what I want to do is have an automatic listing ie if a new report is added, it is automatically available and I don't have to go in and add it manually.

Any ideas?

Thanks in advance

Hollie

[Edneeis]

You should be able to use the reports collection in Access or your Access object. It goes something like AccApp.Reports(2).Name or something like that.

[Hollie]

Heres my code to generate the list of reports.

I get nothing out and temp = 0 but I have three reports!!

can anyone help?

H.

Private Sub Form_Load()
' Initialise list of reports

Dim temp As Integer
Dim temploop As Integer

Set ErrReport = CreateObject("Access.Application")
ErrReport.OpenCurrentDatabase "C:\db1.mdb"

temp = ErrReport.Reports.Count

For temploop = 0 To temp - 1
    lstReports.List(temploop) = ErrReport.Report(temploop).Name
Next

End Sub

[Edited by Hollie on 11-20-2000 at 04:15 PM]