Reading fieldnames from tabel

Dear VB programmers,

I made the next sentences:

Set NewDb = NewWS.OpenDatabase("Q.MDB")
TempStr = "select * from TABEL"
Set NewDyn = NewDb.OpenRecordset(TempStr)

How can I read all fieldnames from the tabel?

Nice greetings,

Ingrid.

Hi, Ingrid!
Test it:

Code:

---

Dim x&, i&

Set dbtest = OpenDatabase("d:\db1.mdb", True)
 
With dbtest.TableDefs("Table1")
    x = .Fields.Count - 1
    For i = 0 To x
        Debug.Print .Fields(i).Name
    Next
End With

dbtest.Close

---

Best regards.

------------------
smalig
[email protected]
smalig.tripod.com