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.
Printable View
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:
Best regards.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
------------------
smalig
[email protected]
smalig.tripod.com