当前位置:编程学习 > VB >>

VB6.0中,如何通过ADO访问远程MS Sql server 2000

在甲城市一台电脑安装MS Sql server 2000,乙城市通过IP访问甲城市的MS Sql server 2000,
请问怎么解决? --------------------编程问答-------------------- 确认有公网IP,否则需要映射,打开1433端口。

或者使用VPN将2个主机放入虚拟子网。

然后连接字符串直接写对方ip。 --------------------编程问答--------------------
引用楼主 axw010306 的回复:
在甲城市一台电脑安装MS Sql server 2000,乙城市通过IP访问甲城市的MS Sql server 2000,
请问怎么解决?

MS Sql server 2000打上它的sp4补丁,然后用ADODC或ADODB去连接MS Sql server 2000,连接成功后,就象操作本地数据库一样操作。

例子如下:

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是专门被设计用来实现这个用途的。

RDO(远程数据对象) 是微软的一个应用程序接口 (application program interface, API) ,让写Windows应用程序的程序师能够进入微软和其他的数据库供给者的数据库。

RDO 已经发展到微软为新的程序推荐的程序接口--- ActiveX 数据对象。 
ADO也提供进入非关系数据库的接口而且比较容易使用。
尽管 RDO 在很好地访问 Jet 或 ISAM 数据库方面受到限制,而且它只能通过现存的 ODBC 驱动程序来访问关系数据库。但是,RDO 已被证明是许多 SQL Server、Oracle 以及其他大型关系数据库开发者经常选用的最佳接口。RDO 提供了用来访问存储过程和复杂结果集的更多和更复杂的对象、属性,以及方法。 --------------------编程问答--------------------
引用 1 楼 caozhy 的回复:
确认有公网IP,否则需要映射,打开1433端口。

或者使用VPN将2个主机放入虚拟子网。

然后连接字符串直接写对方ip。

这2个方法是可行的,连公网的通用方法
补充:VB ,  网络编程
CopyRight © 2012 站长网 编程知识问答 www.zzzyk.com All Rights Reserved
部份技术文章来自网络,