How to usa ALTER COLUMN to change a column name

[Guest]

Hi,

I´m trying to change the column name using ALTER TABLE, but I didn´t find
any example how can I do that. Could you help me?

 

[Guest]

Try a different approach

Function FunctionName()

Dim MyDb as Dao.database
Dim MyRec as Dao.TableDef
Dim FldName as DAO.Field

Set MyDb=codedb()
Set MyRec = MyDb.TableDefs("TableName")
Set FldName = Myrec!FieldName

FldName.name = "New name"

End Function

 

[peregenem]

I´m trying to change the column name using ALTER TABLE

ALTER TABLE Customers ADD Telephone VARCHAR(24)
;
UPDATE Customers SET Telephone = Phone
;
ALTER TABLE Customers DROP Phone
;