將VBA與Oracle 11g企業版連接

Question

我想將VBA連接到Oracle 11 g-我正在檢查連接字符串是否正常。

嘗試下面的代碼時，我在打開連接時出錯。

運行時錯誤-3706應用程序定義錯誤或對象定義錯誤。

任何人都可以幫忙嗎？

代碼：

Sub getdatafromOracle() 
Dim connectdb As ADODB.Connection 

connectdb.ConnectionString = "PROVIDER= OraOLEDB.Oracle;DATA SOURCE=DBname;USER ID=uname;PASSWORD=Pword" 

connectdb.Open 
connectdb.Close 

End Sub 

Answer 1

您HABE初始化Connection對象，然後才能使用它。

set connectdb = New ADODB.Connection 

也許你就必須使用這個語法（我不知道）：

connectdb.Open("PROVIDER=OraOLEDB.Oracle;DATA SOURCE=DBname", "uname", "Pword")