vb 连接 sql server 本机可以连上,其他机器连不上,达人帮忙啊

来源:百度知道 编辑:UC知道 时间:2024/05/29 09:49:03
连接数据库的代码如下:
conn.connectionstring = "Driver={SQL Server};SERVER=192.168.0.33;DATABASE=number;UID=sa;PWD=123"
conn.Open

192.168.0.33是我机器的IP,在我本机能连上,到了别的机器上提示SQL SERVER不存在或访问被拒绝,前提是我的两台机器防火墙都关了,还不行,请高人帮忙
在同一个网段内

Public Function ConnectDB(Optional ByVal intConnectTimeOut As Integer, Optional intCommandTimeOut As Integer) As ADODB.Connection
Dim SourceConn As New ADODB.Connection
Dim strConnectString As String
strConnectString = "你的连接语句" SourceConn.ConnectionTimeout = 500
SourceConn.CommandTimeout = 500
SourceConn.Open strConnectString
Set ConnectDB = SourceConn
Set SourceConn = Nothing
End Function

两台计算机是不是在同一个内网中的?除了关闭金山网镖,瑞星防火墙外,还要为网卡的防火墙添加端口许可。