在Access中更改链接表中的表名

Question

我试图在Access中更改表的名称。我已经去了链接管理器并经历了这个过程。它将更改为我放置的服务器，但它永远不会更改表名称（以黄色突出显示）。

Answer 1

看来你的目标是改变联系TableDef的，但我怀疑这是可能的。试图做到这一点触发错误＃3268：

一旦对象是集合的一部分，不能设置此属性。

所以我认为你必须创建一个新的链接TableDef从旧链接Connect属性和新的值和Append是到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