Renaming fields with Alter Table Problem!!??

[emumaster]

I have searched and tried everything in the forums and can't seem to get this code to work.

ALTER TABLE mytablename RENAME COLUMN oldfieldname TO newfieldname

It kicks an error when I try to run this query, stopping at the RENAME every time.

I am using Access 2002, no sql server.
Any suggestions??

 

[KellyK]

How about adding a new column with the name you want, moving the data from the old column into the new, and then deleting the old column? Kind of tedious but the only way I've found for this to work. Kelly

 

[StarPassing]

Try this:
Dim db As Database
Set db = CurrentDb
' Rename the field
db.TableDefs("[" & TblName & "]&quot.Fields("CurrentFieldName&quot.Name = NewFieldName


Tom

 

[emumaster]

Thanks for the fix! I appreciate how small the code is too!