Public Function ConnectString() As String
ConnectString = "Driver={SQL Server};Server=HR01\sa;Database=REPORT;Uid=SA;Pwd=;;"
End Function这样连接没有问题,我的是在局域网中,IP地址是:172.26.151.36,现在想将它改为局域网共用,多用户使用,该怎么设置SQL Sevver 2000和写连接代码?我的SQL已设置为混合模式,谢谢用下面的代码不行:
Public Function ConnectString() As String
ConnectString = "Driver={SQL Server};Server=172.26.151.36;Database=REPORT;Uid=SA;Pwd=;;"
End Function
ConnectString = "Driver={SQL Server};Server=HR01\sa;Database=REPORT;Uid=SA;Pwd=;;"
End Function这样连接没有问题,我的是在局域网中,IP地址是:172.26.151.36,现在想将它改为局域网共用,多用户使用,该怎么设置SQL Sevver 2000和写连接代码?我的SQL已设置为混合模式,谢谢用下面的代码不行:
Public Function ConnectString() As String
ConnectString = "Driver={SQL Server};Server=172.26.151.36;Database=REPORT;Uid=SA;Pwd=;;"
End Function
"Provider = SQLOLEDB.1;Persist Security Info = False;" & _
"User ID = sa; Password =; Data Source = 172.26.151.36;Initial Catalog = REPORT"
2,关闭SQL机器防火墙,包括windows自带的防火墙
为SQL服务器开放1433端口,它是sql2000的默认端口。用ADODC或ADODB连接
修改SQL的ODBC连接串为SQLOLEDB连接串