do you just want the table and field name or do you need to know more such as if the table is linked and if so to what, details about the field such as datatype and constraints? And why one table when you have two different entities?
best way would be to loop through the tabledefs containing a second loop to loop through the fields - something like
Code:
dim tdf as dao.tabledef
dim fld as dao.field
for each tdf in currentdb.tabledefs
for each fld in tdf.fields
currentdb.execute("INSERT INTO newTable (TName, FName) Values('" & tdf.name & "', '" & fld.name & "')")
next fld
next tdf