Recordset Objects and Fields

[DeutchBose]

I have code that works in Access 97 with DAO 2.5/3.5 but is failing in Access XP with DAO 3.51

Dim db As Database
Dim rs As Recordset
Dim tbldef As TableDef
Dim GuideTable As String

GuideTable = "Table1"
Set db = CurrentDb()
Set rs = db.OpenRecordset(GuideTable)

Set tbldef = db.CreateTableDef(rs.[Table Name])

The code fails with the last line and doesn't seem to recognize the 'rs.[Table Name]' part. 'Table Name' is a field name in "Table1"

Is there a different syntax that I'm missing? Any help would be appreciated. Thanks.

 

[Norie]

Does this work?

Set tbldef = db.CreateTableDef(rs.Fields("Table Name"))

 

[DeutchBose]

Yes, that did the trick...thank you!