List all the reports in a VB6 Project

[soulbriski]

Hi

Does anyone know how to itterate the reports collection in a VB6 project?

I am trying to present a list to the user, of reports that are available in the application but there doen't seem to be the opportunity to itterate the reports collection as you would any other object.

For instance, If the following code would work, there would be no problem.

Dim rpt as DataReport 'This is OK
 
For Each rpt in <ThisProject>.DataReports 'This doesnt exist
 
[INDENT]lstReports.AddItem rpt.Name[/INDENT]
Next rpt

If this worked the user could then select the report name from the list, choose to preview it or not and specify criteria like date ranges etc

Is it possible to achieve what I'm trying to?

Many thanks