ms-access - 更改 Access 中链接表中的表名称

Question

我正在尝试更改 Access 中表的名称。我已经找到链接管理器并完成了该过程。它将更改为我放置的服务器，但它永远不会更改表名称(以黄色突出显示)。

Answer 1

您的目标似乎是更改链接的 TableDef 的 SourceTableName，但我怀疑这是可能的。尝试这样做会触发错误#3268:

Cannot set this property once the object is part of a collection.

因此，我认为您必须使用旧链接中的 Connect 属性和新的 SourceTableName 值创建一个新链接的 TableDef ，并且将其附加到TableDefs集合中。

Const cstrOldName As String = "dbo_tblFoo2"
Dim db As DAO.Database
Dim tdfOld As DAO.TableDef
Dim tdfNew As DAO.TableDef
Set db = CurrentDb
Set tdfOld = db.TableDefs(cstrOldName)
tdfOld.Name = cstrOldName & "_old" ' rename the old link

Set tdfNew = db.CreateTableDef
With tdfNew
    .Name = cstrOldName
    .Connect = tdfOld.Connect
    .SourceTableName = "dbo.Dual"
End With
db.TableDefs.Append tdfNew