>To all,
>
>I'd like to create an app that will open an Access database, interogate the mdb and build a set of views of the tables in the MDB.
>
>Is there a sample of code that will show me how to interogate an MDB with, say, DbGetProp()?
>
>Regards,
>Thom C.
Thom,
You can also do this with ADOX, see this simple example: (illustration purposes only)
adoxCat = CreateObject("ADOX.Catalog")
oCn = CreateObject("ADODB.Connection")
oCn.Open("Provider=Microsoft.Jet.OLEDB.4.0;Data Source=D:\Temp\db1.mdb;")
adoxCat.ActiveConnection = oCn
For Each oTbl In adoxCat.Tables
? oTbl.Name
For Each oCol In oTbl.Columns
? Chr(9), oCol.Name
Next
Next
oCn.Close()
HTH