TableDef in Access2003

[Clueless]

Hi,
I'm trying to figure out how to enumerate the fields in a table in a
current database from vba. The documentation seems to suggest it's possible
but only details how not to do it.

 

[Brendan Reynolds]

Public Sub ListFields(ByVal strTableName As String)

Dim fld As DAO.Field
Dim db As DAO.Database
Set db = CurrentDb
For Each fld In db.TableDefs(strTableName).Fields
Debug.Print fld.Name
Next fld

End Sub

 

[Clueless]

Thanks! I should have thought of useing DAO instead of the Access functions.