我收到一個錯誤,「[Microsoft] [ODBC SQL Server Driver] [SQL Server]'Microsoft'附近的語法不正確。獲取「[Microsoft] [ODBC SQL Server驅動程序] [SQL Server]'Microsoft'附近的語法不正確。
下面是代碼:
Dim conn As ADODB.Connection
Dim rst As ADODB.Recordset
Dim stSQL As String
Public Sub loadData()
'This was set up using Microsoft ActiveX Data Components version 6.0.
'Create ADODB connection object, open connection and
' construct the connection string object which is the DSN name.
Set conn = New ADODB.Connection
conn.ConnectionString = "sql_server"
conn.Open
'conn.Execute (strSQL)
On Error GoTo ErrorHandler
'Open Excel and run query to export data to SQL Server.
strSQL = "SELECT * INTO SalesOrders " & _
"FROM OPENDATASOURCE(Microsoft.ACE.OLEDB.12.0;" & _
"Data Source=C:\Workbook.xlsx;" & _
"Extended Properties=Excel 12.0; [Sales Orders])"
conn.Execute (strSQL)
'Error handling.
ErrorExit:
'Reclaim memory from the cntection objects
Set rst = Nothing
Set conn = Nothing
Exit Sub
ErrorHandler:
MsgBox Err.Description, vbCritical
Resume ErrorExit
'clean up and reclaim memory resources.
conn.Close
If CBool(cnt.State And adStateOpen) Then
Set rst = Nothing
Set conn = Nothing
End If
End Sub
好的。我明白你的意思了。我做了更改,但是現在我得到[Microsoft] [ODBC SQL Server驅動程序] [SQL Server] OLE DB提供程序「Microsoft.ACE.OLEDB.12.0」用於鏈接服務器「(null)」返回消息「未指定的錯誤」 。 – brohjoe
確保運行該查詢的帳戶有權訪問該文件的帳戶(可能需要讀取和寫入)並確保該文件未在其他位置打開。 (還記得C:\在那個路徑是服務器上的C盤!) –
感謝您的幫助亞歷克斯。你也是Raj! – brohjoe