远程数据库的访问(VB数据库)

来源：作者：出处：巧巧读书 2006-10-11 进入讨论组

杨尚勤

---- 远程数据对象（RDO）是 VB 5.0 中基于 ODBC API 的对象模型，它短小、快捷、强健，可以访问任何 32 位 ODBC 数据源，如 SQL Server 和 Oracle 数据库，是访问远程数据库的更新更高级的工具。
---- 使用 RDO 的一般方法如下。
---- 先声明变量：

Public con As rdoConnection, res As rdoResultset

---- 然后初始化 rdoEngine，设置用户和口令等缺省参数；

With rdoEngine
.rdoDefaultUser = "sa" '用户为 sa
.rdoDefaultPassword = "pass" '口令为 pass
.rdoDefaultCursorDriver = rdUseServer
.rdoDefaultLoginTimeout = 15
End With

---- 再连接到要访问的远程数据库（可使用 DSN Connection 和 DSN-Less Connection）。
---- 使用 DSN Connection 举例（连接服务器 SERVER 上的数据库 hotel）：

Set con = rdoEnvironments(0).OpenConnection
("hotel", rdDriverNoPrompt, False)

---- 使用 DSN-Less Connection 举例（连接服务器 SERVER 上的数据库 hotel）：

Set con = rdoEnvironments(0).OpenConnection
("", rdDriverNoPrompt, False, _
"driver={SQL Server};
server=SERVER; database=hotel")

---- 建立连接后，既可使用 OpenResultset 方法执行查询并处理结果集，又可使用 Execute 方法执行包括数据定义和数据操作在内的动作查询。例如：

Set res = con.OpenResultset
("SELECT * FROM menu", rdOpenStatic)
con.Execute "CREATE VIEW menu_view AS SELECT 代码,
菜名FROM menu", rdExecDirect

---- RDO 最强大和最重要的特性之一是：它可以查询和处理由存储过程返回的结果，无论它有多么复杂。
---- 除 RDO 外，还可使用 RDC 访问远程数据库。
---- 远程数据控件（RDC）与数据控件（DC）类似，不同之处是 RDC 使用 RDO 连接到 ODBC 驱动程序管理器，而 DC 则使用 DAO 连接到 Jet 数据库引擎。利用 RDO 和 RDC，无需使用 Jet 引擎就可以访问 ODBC 数据源。这样，在访问远程数据库时，可以获得更好的性能和更大的灵活性。
---- 远程数据控件 MSRDC 使用举例如下。

Connect: driver={SQL Server}; server=SERVER; database=hotel
DataSourceName:
SQL: SELECT * FROM menu
UserName: sa
Password: pass
CursorDriver: 3-rdUseClient

---- 可以使用 RDC 执行许多简单的远程数据访问操作，不需编写任何代码，只要填写有关项就可以了，使用起来很方便。但应注意，除非在设计时禁止并只在需要时启动 RDC ，否则它至少将消耗一个远程数据库连接。在远程数据库连接资源有限或要求很高效的情况下，宜慎用、少用 RDC 。这种情况下，应尽可能考虑使用 RDO ，并使用存储过程（预编译好的 SQL 语句）。
---- 最后还应注意，只有 32 位操作系统（如 Windows NT 或 Windows 95），才能支持 RDO 和RDC 。RDO 和 RDC 也只能用于访问 32 位 ODBC 数据源。

http://www.qqread.com/vb/e217752.html