You don't say what version of Access your are using.
Here is a way to fill a ListBox on a form with all the Reports in your Database using DAO. If you are using Access 2000/2002, you will need to enable Microsoft DAO 3.6 Library and alter the code slightly to get it to work.
Private Sub Form_Load()
Dim dbs As Database
Set dbs = CurrentDb
Dim ctr As Container
Dim rptList As String
Dim doc As Document
rptList = ""
Set ctr = dbs.Containers("Reports"
' Build the value list for Reports
For Each doc In ctr.Documents
rptList = rptList & doc.Name & ";"
Next
' Load the List box
rptList = Left(rptList, Len(rptList) - 1) ' truncate the last semicolon
YourLstBoxName.RowSourceType = "Value List"
YourLstBoxName.RowSource = rptList
End Sub
(change "YourLstBoxName" to the actual name of your ListBox)
HTH
RDH
Ricky Hicks
Birmingham, Alabama