VB+SQL SERVER2000 做远程访问,数据库连接字符串的问题

时间:2022-01-28 13:40:41
我用sql +vb6做一个C/S程序.但是客户端和服务器不在同一个局域网内. 服务器用1433端口.我试了n遍,用客户端企业管理器都连接不上.后来把端口改为1434,客户端终于可以用企业管理器访问远程服务器了.但是用代码连接,就提示 "sql server 不存在或拒绝访问"
我又试验了N个连接字符串.还是不成功.

1 是不是端口必须用1433?
2 能不能是我的网速太慢了。因为我的客户端是无线上网
3 谁能给我一个连接字符串?(我是写不对了) 
4 问题解决了.多少分都可以

7 个解决方案

#1


cn.ConnectionString = "Provider=SQLOLEDB;Persist Security Info=False;Initial Catalog=DataBaseName;uid=sa;pwd=;Server=(local)"
我用过GPIS连接都没有问题

#2


不是端口的问题,不信你在不能连接的机子上先用在地址栏输入如\\192.168.1.2,先连一下,再用客户端企业管理器连接,保证就通了,呵呵。。。

#3


支持2楼观点

首先得看该客户机能否访问服务器,然后再检查联接方式

#4


企业管理器能连接,说明网路是通的,最好还是用查询分析器连接操作一下数据库,只要查询分析器能操作,那用ADO也可操作了

Driver={SQL Server};Server=127.0.0.1;Database=mydb;uid=sa;pwd=123456

#5


对于无线上网,连接对象的超时值应设置大一些,如:
dim DB As New ADODB.Connection
Set DB = New ADODB.Connection
DB.CursorLocation = adUseClient
DB.ConnectionTimeout = 30
DB.CommandTimeout = 240
strSql="Provider=sqloledb;User Id=sa;Password=实际的密码;Data Source=具体的ip地址或计算机名;Initial Catalog=具体的数据库名;"
DB_CZGL.Open strSql

再有就是要注意windows防火墙的问题。还有就是sql的补丁。

#6


Conn.Open "Provider=sqloledb;Data Source=" & My_Server$ & ",1433;Network Library=DBMSSOCN;Initial Catalog=" & My_Database$ & ";User ID=" & My_User$ & ";Password=" & My_Password$ & ";"


Conn.Open "Driver={SQL Server};Server=" & My_Server$ & ",1433;Network Library=DBMSSOCN;Database=" & My_Database$ & ";Uid=" & My_User$ & ";Pwd=" & My_Password$ & ";"

#7


DING

#1


cn.ConnectionString = "Provider=SQLOLEDB;Persist Security Info=False;Initial Catalog=DataBaseName;uid=sa;pwd=;Server=(local)"
我用过GPIS连接都没有问题

#2


不是端口的问题,不信你在不能连接的机子上先用在地址栏输入如\\192.168.1.2,先连一下,再用客户端企业管理器连接,保证就通了,呵呵。。。

#3


支持2楼观点

首先得看该客户机能否访问服务器,然后再检查联接方式

#4


企业管理器能连接,说明网路是通的,最好还是用查询分析器连接操作一下数据库,只要查询分析器能操作,那用ADO也可操作了

Driver={SQL Server};Server=127.0.0.1;Database=mydb;uid=sa;pwd=123456

#5


对于无线上网,连接对象的超时值应设置大一些,如:
dim DB As New ADODB.Connection
Set DB = New ADODB.Connection
DB.CursorLocation = adUseClient
DB.ConnectionTimeout = 30
DB.CommandTimeout = 240
strSql="Provider=sqloledb;User Id=sa;Password=实际的密码;Data Source=具体的ip地址或计算机名;Initial Catalog=具体的数据库名;"
DB_CZGL.Open strSql

再有就是要注意windows防火墙的问题。还有就是sql的补丁。

#6


Conn.Open "Provider=sqloledb;Data Source=" & My_Server$ & ",1433;Network Library=DBMSSOCN;Initial Catalog=" & My_Database$ & ";User ID=" & My_User$ & ";Password=" & My_Password$ & ";"


Conn.Open "Driver={SQL Server};Server=" & My_Server$ & ",1433;Network Library=DBMSSOCN;Database=" & My_Database$ & ";Uid=" & My_User$ & ";Pwd=" & My_Password$ & ";"

#7


DING