Public Function cnn() As ADODB.Connection    '定义函数
    Set cnn = New ADODB.Connection
    '返回一个数据库连接
    cnn.Open "Provider=SQLOLEDB;Persist Security Info=False;User ID=sa;PWD=1234;Initial Catalog=wb_data"
End Function
上面语句连接本机正确,但要连接服务器,IP地址是192.168.1.2,请问应该怎样改?

Public Function cnn() As ADODB.Connection    '定义函数
    Set cnn = New ADODB.Connection
    '返回一个数据库连接
    cnn.Open "Provider=192.168.1.2;Persist Security Info=False;User ID=sa;PWD=1234;Initial Catalog=wb_data"
End Function

是这样吗？

不是,还是出错.实时错误"3706"

重装试试
http://www.

或者去VB区问问。

或者搜索关键词：实时错误"3706"

cnn.Open "Provider=SQLOLEDB;data source=192.168.1.2;Persist Security Info=False;User ID=sa;PWD=1234;Initial Catalog=wb_data"