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

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

1 是不是端口必须用1433?
2 能不能是我的网速太慢了。因为我的客户端是无线上网
3 谁能给我一个连接字符串？（我是写不对了） 
4 问题解决了.多少分都可以 --------------------编程问答-------------------- cn.ConnectionString = "Provider=SQLOLEDB;Persist Security Info=False;Initial Catalog=DataBaseName;uid=sa;pwd=;Server=(local)"
我用过GPIS连接都没有问题 --------------------编程问答-------------------- 不是端口的问题，不信你在不能连接的机子上先用在地址栏输入如\\192.168.1.2，先连一下，再用客户端企业管理器连接，保证就通了，呵呵。。。 --------------------编程问答-------------------- 支持2楼观点

首先得看该客户机能否访问服务器，然后再检查联接方式 --------------------编程问答-------------------- 企业管理器能连接，说明网路是通的，最好还是用查询分析器连接操作一下数据库，只要查询分析器能操作，那用ADO也可操作了

Driver={SQL Server};Server=127.0.0.1;Database=mydb;uid=sa;pwd=123456 --------------------编程问答-------------------- 对于无线上网，连接对象的超时值应设置大一些，如：
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的补丁。 --------------------编程问答-------------------- 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$ & ";" --------------------编程问答-------------------- DING

补充：VB ,  网络编程