I've modified it to work with ADOX, since I couldnt get it to work as was... and I already had a working app which enumerates tables and fields.
The resulting Schema.ini looks great except for one major problem. When I enumerate through the .Columns collection it is NOT listing them in the order they are defined in the table, but is instead enumerating them alphabetically.
Any ideas how I can get them listed in the order they truly appear?
(If you have ideas on how to suck import specs out from a .mdb I'd love the info as well)
Incase its of interest:
Dim cat As ADOX.Catalog
Dim tbl As ADOX.Table
Set tbl = cat.Tables(sTblQryName)
For i = 0 To tbl.Columns.Count - 1
fldName = .Name