Question About ADOX.Catalog

M

MDW

Hey all

I'm trying to display a list of all the columns in a table using the ADOX Catalog. Here's the code I have

Set objConn = CurrentProject.Connectio
Set objCat = CreateObject("ADOX.Catalog"

objCat.ActiveConnection = objCon
Set objTbl = objCat.Tables(WhichTable

For Each objCol In objTbl.Column

strList = strList & ";" & objCol.Nam

Nex

WhichTable is a variable containing the name of the table I'm interested in

Now, this code WORKS, but the columns are added to the list in alpha order, instead of the order they are defined in the table itself. Is there any way to return the columns in the order that they appear in the table

Access 2000/Win2k
 
Top