>Does anyone know the way, how to change a field name in access database (.mdb) with a ADO connection?

Hi,

lcMDBPath = "C:\test.mdb"
lcMDBStr = "Provider=Microsoft.Jet.OLEDB.4.0;Persist Security Info=False;Data Source=" + lcMDBPath + ";"

oCat = Create("adox.Catalog")
oCn = Create("adodb.Connection")
oCn.Open(lcMDBStr)
oCat.ActiveConnection = oCn
oCat.Tables("SomeTable").Columns("SomeField").Name = "NewName"
oCn.Close()

You could also rename column using Connection.Execute() method, but because of SQL command ALTER TABLE ... RENAME COLUMN is not supported by Access, you'll need to add a new column, copy data from old column to a new one, and drop old column.

HTH,
Alexander