访问错误创建链接的 Oracle 表

Posted 2023-05-07

【中文标题】访问错误创建链接的 Oracle 表

【英文标题】：Access error creating linked Oracle table

【发布时间】：2011-09-30 14:48:33

【问题描述】：

我尝试创建一个指向 Oracle 的链接表。为了简单起见，我从一个运行良好的手动创建的链接表中“窃取”了连接字符串。代码在 Append 中中断，如下所示。有什么线索吗？谢谢！

Sub CreaOra()
    Dim db As DAO.Database
    Dim td As DAO.TableDef
    Dim strConn As String
    Set db = CurrentDb
    'connection string copied from a working linked table !'
    strConn = "ODBC;DRIVER=Oracle in OraClient10g_home1;SERVER=ORAJJJ0;UID=xxx;PWD=yyy;DBQ=ORAWOD0;"
    Set td = db.CreateTableDef(Name:="test", SourceTableName:="ORAJJJC01.TBL_MYTBL", Connect:=strConn)
    'next row -> error 3264 No field defined--cannot append TableDef or Index
    db.TableDefs.Append td

    Set td = Nothing
    Set db = Nothing
End Sub

【参考方案1】：

attributes 参数不能为空。你需要传递0或dbAttachSavePWD

  Set td = db.CreateTableDef(Name:="test", Attributes:=0,  SourceTableName:="ORAJJJC01.TBL_MYTBL", Connect:=strConn)

如果您不想明确将其设置为 0，也可以这样做

   Set td = db.CreateTableDef("test")
   td.SourceTableName:="ORAJJJC01.TBL_MYTBL"
   td.Connect:=strConn

注意：如果您查看监视窗口中的 td，可以观察到，如果您不传递属性值，则 Connect 和 SourceTableName 会设置为空，但在您传递时会保留。

【讨论】：

非常感谢，我会看看那个星期一早上（现在是卢森堡晚上 9 点）。