2017-08-10 137 views
0

我是VBA的新手。當我嘗試執行這段代碼(由別人寫的),我會在objMyconn.open一個錯誤:運行時錯誤2147467259(80004005)ODBC SQL服務器不存在或訪問被拒絕

Dim objMyConn As ADODB.Connection 
Dim objMyCmd As ADODB.Command 

Set objMyConn = New ADODB.Connection 
Set objMyCmd = New ADODB.Command 
Set dependenciesRecordset = New ADODB.Recordset 

dependenciesRecordset.CursorLocation = adUseClient 

objMyConn.ConnectionString = "Provider=MSDASQL;Driver=SQL Server;Server=aac- 
srvsqldb02\db02;Database=mydatabase;UID=webreport;PWD=abcdefghijkl;" 
objMyConn.Open 
+0

是您的ConnectionString正確? 您是否可以從您運行的計算機上訪問數據庫服務器位置? –

+0

是的,它是正確的 –

+0

查看SQL Server的日誌文件。 – UGP

回答

0

我假設驅動程序名稱應該是如之間{}:Driver={SQL Server}

相關問題