Field List

[Guest]

How can I easily get a list of field names in a table?

 

[Douglas J. Steele]

Using DAO, something like:

Dim tdfCurr As DAO.TableDef
Dim fldCurr As DAO.Field

Set tdfCurr = CurrentDb().TablesDefs("MyTable")
For Each fldCurr In tdfCurr.Fields
Debug.Print fldCurr.Name
Next fldCurr

You can also use ADOX, but I'm afraid I don't have a sample handy.