我正在用 VBA 编写代码片段以从 SQL Server 2008r2 数据库中提取数据。但是,我在 Conn.Open: [Microsoft][SQL Server Native Client 10.0]Named Pipes Provider: Could not open a connection to SQL Server [53]收到错误。
使用ConnectionString.com和另一个SO Question,我写了这个:
Function GetAddress() As String
Dim Conn As ADODB.Connection
Set Conn = New ADODB.Connection
Dim Rst As ADODB.Recordset
Set Rst = New ADODB.Recordset
Conn.ConnectionString = "Provider=SQLNCLI10;Server=12.34.5678;" & _
"Database=OurDB;User ID=myuserid;Password=mypw;"
Conn.Open
Set Rst.ActiveConnection = Conn
Rst.Open "Select top 1000 * from MainTable"
End Function
谷歌搜索错误表明命名管道可能已禁用。在此之后,我检查了 SQL Server 配置管理器,并且命名管道已完全启用(共享内存和 TCP/IP 之后的第三个顺序)。
如何让这个错误消失?我是否使用了正确的连接字符串?