VBA无法创建与远程SQL数据库的连接

Question

我创建了一个excel前端接口来连接和操作SQL数据库。我最近收到了一台笔记本电脑，并希望能够在上述笔记本电脑上处理来自excel的数据。我使用SQL Server Management Studios与数据库建立了连接。

我试图更新我的excel文件；但是，VBA代码无法连接到SQL数据库。我更改了一些变量，并设置了集成安全性，但到目前为止没有任何效果。错误消息的读数可以在这里查看：

以下是与数据库连接有关的代码：

Dim cnSQL As ADODB.Connection
Set cnSQL = New ADODB.Connection
cnSQL.Open "Provider = SQLOLEDB; Integrated Security = SSPI, Data Source = IP Address,Static TP Port; UID = username; PWD =pwd@; Initial Catalog = database"

该错误消息突出显示了第二行代码。我希望能够从笔记本电脑连接到数据库。

Answer 1

经过几天的苦苦挣扎，我终于把它弄干了。要使excel与Remote SQL网络一起使用，需要采取两个重要步骤。首先，这里是用于连接的代码：

Dim cnSQL As ADODB.Connection
Dim ServerName As String
Dim DatabaseName As String
Dim userID As String
Dim password As String
ServerName = "IP Addresss,Port"
DatabaseName = "DB Name"
userID = "username"
password = "pwd"
Set cnSQL = New ADODB.Connection
sqlCommand.ActiveConnection = cnSQL

将代码更改为此后，出现一个新错误：“未实现可选功能。”为了解决此错误，我将所有“ adDate”的数据类型更改为“ adDBTimeStamp”。这出于某些原因起作用，我不知道为什么。可以。