请大大帮忙，数据库连接问题
用VB编了个查询小程序。配置如下
'cnnStr = "Provider=SQLOLEDB.1;" _
& "User ID=major;" _
& "Password =major;" _
& "Data Source=BCICYUIMPPCDN2M\SQL2000;" _
& "Initial Catalog=LDR"
访问数据库是 本网段局域网正常连接，可以跨网段局域网就报错
---------------------------
工程1
---------------------------
Run-time error '-2147467259 (80004005)':
[DBNETLIB][ConnectionOpen (Invalid Instance()).]无效的连接。
---------------------------
确定
---------------------------
数据库是可以ping通的， telnet 1433端口也可以。求解。在线等 谢谢
[解决办法]
去这里找找
[解决办法]
远程数据对象和集合为使用代码来创建和操作一个远程 ODBC数据库系统的各个部件提供了一个框架。对象和集合都具有描述数据库的各个部件特征的属性以及用来操作这些部件的方法。使用包含框架，可以在对象和集合之间建立起关系，这些关系就代表了数据库系统的逻辑结构。
对象和集合提供了各种不同类型的包含关系：对象包含零个或多个不同类型的集合；而集合包含了零个或多个同一类型的对象。尽管对象和集合是相类似的实体，但它们之间的差异区分了这两类不同的关系。
注意 RDO仅被 32 位操作系统支持，如 Windows 95 和 Windows NT。要使用这种远程数据对象，必须在 Visual Basic“引用”对话框中设置对 Microsoft Remote Data Object 2.0 对象库的一个引用。
在下表中，第一栏中的集合类型包含第二栏中的对象类型。第三栏描述每一个对象类型所代表的内容。
集合 对象 描述
rdoConnections rdoConnection 打开的或已分配的连接。
无 rdoEngine 远程数据库引擎。
rdoErrors rdoError ODBC 错误的信息。
rdoEnvironments rdoEnvironment 具有普通用户名和密码的 rdoConnection 对象的逻辑集合。
rdoColumns rdoColumn 一列，是
rdoResultset 的一部分。
rdoParameters rdoParameter rdoQuery 或rdoPreparedStatement 的一个参数。
rdoPreparedStatements rdoPreparedStatement 一个被保存的查询定义（已经过时）。
rdoQueries rdoQuery 一个被保存的查询定义。
rdoResultsets rdoResultset 一个查询所产生的行。
rdoTables rdoTable 一个表定义。
