修改Access字段名有两中方法:
【方法1】利用adox对象
Microsoft ADO Ext. for DDL and Security (ADOX)ADOX 除了提供管理安全性所需的对象之外,还提供了新建数据库及其所含对象所需的“数据定义语言 (DDL)”对象。
用ADOX创建数据库:
; Create a database using ADOX
oCatalog := ComObjCreate("ADOX.Catalog")
oCatalog.Create(sConnectionString)
oTable := ComObjCreate("ADOX.Table")
oTable.Name := "MyTable"
oTable.Columns.Append("ID", 3) ; adInteger 3 Indicates a four-byte signed integer (DBTYPE_I4).
oTable.Columns.Append("Name", 202, 50) ; adVarWChar 202 Indicates a null-terminated Unicode character string.
oCatalog.Tables.Append(oTable)
oTable := ""
oCatalog := ""
用ADOX修改表的字段名:
sDatabaseName := "d:\TestDatabase.MDB"
sConnectionString := "provider=Microsoft.Jet.OLEDB.4.0;Data Source=" . sDatabaseName
oCatalog := ComObjCreate("ADOX.Catalog")
oConnection := ComObjCreate("ADODB.Connection")
oConnection.Open(sConnectionString)
oCatalog.ActiveConnection := oConnection
oCatalog.Tables("MyTable").Columns("姓名") := "Name"
oCatalog := ""
oConnection:= ""
【补充:方法2】利用ado对象(对于很多表的情况不适合)