Adodb.Connection不能在Excel中工作VBA操作系統：Windows 7專業版64位

Question

我有一個帶有VBA代碼的Excel文件，用於從在Windows XP上運行的Oracle數據庫導入數據。

當我在Windows 7 SP1 64位上嘗試時，我在下面的代碼的第一行出現錯誤。

Function getConnection2() As ADODB.Connection 
    Dim cnn As New ADODB.Connection 
    Dim strCnn As String 

    strCnn = "Data Source=XXXXX;User ID=XXXXX;Password=XXXXXXX;" 
    cnn.Provider = "OraOLEDB.Oracle" 
    cnn.ConnectionString = strCnn 

    cnn.Open 
    Set getConnection2 = cnn 
End Function 

錯誤：編譯錯誤：自動化錯誤

我搜索MSDASQL爲Windows 7，但無法找到微軟網站一樣。他們有它的Windows 2003 http://www.microsoft.com/en-in/download/details.aspx?id=20065

我們有任何解決方案，感覺就像它無法爲ADODB創建對象。

Answer 1

這是一個complie錯誤嗎？ 我想在Windows 7中，你在XP 32位使用的庫不再有

VBA編輯器工具 - >參考 - >添加Microsoft ActiveX數據對象庫X.Y