VB6.0中,如何通过ADO访问远程MS Sql server 2000
在甲城市一台电脑安装MS Sql server 2000,乙城市通过IP访问甲城市的MS Sql server 2000,请问怎么解决? --------------------编程问答-------------------- 确认有公网IP,否则需要映射,打开1433端口。
或者使用VPN将2个主机放入虚拟子网。
然后连接字符串直接写对方ip。 --------------------编程问答--------------------
MS Sql server 2000打上它的sp4补丁,然后用ADODC或ADODB去连接MS Sql server 2000,连接成功后,就象操作本地数据库一样操作。
例子如下:
--------------------编程问答-------------------- RDO是专门被设计用来实现这个用途的。
Dim rst As New ADODB.Recordset
Dim cnn As New ADODB.Connection
Dim IP As String , SQL As String
If cnn.State = 1 Then cnn.Close
IP="169.123.67.119" '改成你自己的。
cnn.ConnectionString = "Provider=SQLOLEDB.1;Password=sa;" & _
"Persist Security Info=True;User ID=sa;" & _
"Initial Catalog=pubs;Data Source=" & IP
cnn.CursorLocation = adUseClient
cnn.ConnectionTimeout = 20
cnn.Open
SQL = "select * from zd_sjb where sj>'2009-3-24'"
Set rst = cnn.Execute(SQL)
RDO(远程数据对象) 是微软的一个应用程序接口 (application program interface, API) ,让写Windows应用程序的程序师能够进入微软和其他的数据库供给者的数据库。
RDO 已经发展到微软为新的程序推荐的程序接口--- ActiveX 数据对象。
ADO也提供进入非关系数据库的接口而且比较容易使用。
尽管 RDO 在很好地访问 Jet 或 ISAM 数据库方面受到限制,而且它只能通过现存的 ODBC 驱动程序来访问关系数据库。但是,RDO 已被证明是许多 SQL Server、Oracle 以及其他大型关系数据库开发者经常选用的最佳接口。RDO 提供了用来访问存储过程和复杂结果集的更多和更复杂的对象、属性,以及方法。 --------------------编程问答--------------------
这2个方法是可行的,连公网的通用方法
补充:VB , 网络编程