List all DB Objects

[Moxy1]

is there any code that can list out all tables, queries, forms, reports, macros and modules so I can capture all the object names and their modify date?

 

[PHV]

Have a look here:

http://mdbdoc.sourceforge.net/

Hope This Helps, PH.
FAQ219-2884
FAQ181-2886

 

[Moxy1]

Thanks for the response. I've been able to find the pieces that I need to scan the current database. Is there a way to incorporate this to scan a list of databases?

The goal would be to have a table listing the location and names of the databases to be scanned. The code will loop through this listing and capture all forms/reports with their modify date.

 

[Moxy1]

sorry about that. Apparently I just needed a couple more minutes to figure this out.

Thanks

 

[MichaelRed]

MSysObjects A hidden table lists all you request.




MichaelRed

 

[TheAceMan1]

How are ya Moxy1 . . .

For those who were following this thread, could you post what you came up with?

See Ya! . . . . . .

Be sure to see thread181-473997 [blue]Worthy Reading![/blue]
Also faq181-2886 [blue]Worthy Reading![/blue]

 

[Moxy1]

Public Function Find()

Dim db As Database            
Dim cnt As Container          
Dim doc As Document           
Dim intCount As Integer           
Dim strForm As String
Dim strDate As String
Dim strDest As String

strDest = "database location" 'to be replaced with a recordset
        

    Set db = OpenDatabase(strDest)
        
        ' ******** Forms ********
            Set cnt = db.Containers!Forms
            If cnt.Documents.Count > 0 Then
                For Each doc In cnt.Documents
                    strForm = doc.Name
                    strDate = doc.LastUpdated
                    MsgBox strForm & vbCr & strDate
                Next doc
            
            End If
            

End Function

 

[vbajock]

First, check this out, there is tons of example code in there to get you started:

http://msdn.microsoft.com/en-us/library/aa296830(office.11).aspx

Next get a book or google ADOX if you want to get to an even greater level of detail.

 

[MichaelRed]

Still think that a brief review of MSysObjects provides all the relevant information. No code necessary, just a single query. Lists all db objects, includes the object type and -for tables- the external db they are linked from ...



MichaelRed

 

[TheAceMan1]

Moxy1 . . .

I agree with [blue]MichaelRed[/blue]!, as [blue]MSysObjects[/blue] contains all objects in a Db! ... plus others you never knew existed!

An SQL using a variable [blue]In Clause[/blue] (for each Db) using [blue]MSysObjects[/blue] is all you need! . . .

[blue]Your Thoughts? . . .[/blue]

See Ya! . . . . . .

Be sure to see thread181-473997 [blue]Worthy Reading![/blue]
Also faq181-2886 [blue]Worthy Reading![/blue]