excel - 未找到 Oracle 客户端和网络组件 - Excel VBA

Question

我正在尝试通过 Excel 连接到 Oracle 数据库。我已在计算机上安装了 Oracle 的即时客户端，但在运行以下代码时收到此消息:

Sub testing()


    Dim myConn As Connection: Set myConn = New Connection
    Dim mySet As Recordset: Set mySet = New Recordset
    Dim CONNSTRING As String
    CONNSTRING = "Driver={Microsoft ODBC for Oracle}; " & _
                "CONNECTSTRING=(DESCRIPTION=" & _
                "(ADDRESS=(PROTOCOL=TCP)" & _
                "(HOST=xxxxxx.xxx.xxxxxxxxxxx.com)(PORT=1524))" & _
                "(CONNECT_DATA=(SERVICE_NAME=dev))); uid=xxxxxxx; pwd=xxxxxxxxxxx;"

    myConn.Open CONNSTRING
    mySet.Open "SELECT * FROM apps.ap_invoice_lines_interface", myConn, adOpenStatic, adLockBatchOptimistic, adCmdTable

    Sheet1.Range("A1").CopyFromRecordset mySet

    mySet.Close
    myConn.Close

End Sub

我收到的消息是

未找到 Oracle(tm) 客户端和网络组件。这些组件由 Oracle Corporation 提供，是 Oracle 7.3 版(或更高版本)客户端软件安装的一部分。在安装这些组件之前，您将无法使用此驱动程序

Answer 1

当我们的桌面支持团队安装错误的 Oracle 客户端时，我经常看到此错误。如果您的应用程序(在本例中为 Excel)是 32 位，那么您还需要使用 32 位 ODBC 和 32 位 Oracle 客户端。您的操作系统或硬件是 64 位并不重要。重要的是应用。而且似乎大多数 MS Office 安装都是 32 位的，即使安装在 64 位 Windows 上也是如此。