adding fields in code (DAO)

Topic

New Reply

The following code works if I am creating a new table but if the table does exist it does not add the field.

Set tblNewTable = dbDatabase.CreateTableDef(strTableName)
Set fldNewField = tblNewTable.CreateField(strFieldName, dbDouble)
tblNewTable.Fields.Append fldNewField
dbDatabase.TableDefs.Append tblNewTable

How do get the new field to append into the tabledef if the table already exists?

Reply | Quote

Replies

I worked it out
Set tblNewTable = dbDatabase.TableDefs(strTableName)
instead of
Set tblNewTable = dbDatabase.CreateTableDef(strTableName)

Reply | Quote