说三道四技术文摘-感悟人生的经典句子
说三道四 > 文档快照

用VB和RDO访问SQL Server

HTML文档下载 WORD文档下载 PDF文档下载
用VB和RDO访问SQL Server

远程数据对象 (Remote Data Object ,简称RDO) 是位于 ODBC API
之上的一个对象模型薄层,它依赖 ODBC API、选定的 ODBC 驱动程序以及
后端数据库引擎实现大部分的智能和功能,因此短小(大约250 K)、快速
、强健。RDO具备基本的ODBC处理方法,所以可以直接执行大多数ODBC API
函数。RDO包含在VB4.0/VB5.0企业版中,由一个动态连接库MS RDO32.DLL
实现。 当VB版本还只是2.0时,从VB访问MS SQL Server的手段只有API函
数集(VBSQL/DBLib或 ODBC API)。VB发展到3.0时,其DAO/Jet (Microsoft
Access的数据库引擎)功能非凡,具备面向对象的程序接口,但处理速度尚不
尽如人意。另一方面,尽管VBSQL/DBLib、ODBC API在速度方面性能很好,但
它需要花费很大的精力进行繁琐的编程工作。
当MS SQL Server发展到6.0、VB发展到4.0时,开发了新的对象模块,由此产
生了RDO,可以访问SQL Server、Oracle;RDO2.0则是由VB5.0提供的。值得
一提的是,它实现了“事件驱动型数据库访问的编程方式”。
要讨论RDO,就必然要谈到DAO。DAO/Jet是为了实现从VB访问Access数据库而
开发的程序接口(对象)。RDO是从DAO派生出来的,但两者很大的不同在于
其数据库模式。DAO是针对[记录(Records)]和[字段(Fields)],而RDO是作为
[行(Rows)]和[列(Columns)]来处理。也就是说DAO是ISAM模式,RDO是关系模
式。此外DAO是访问Access的Jet引擎(Jet是ISAM)的接口,而RDO则是访问
ODBC的接口。
可见,RDO是综合了DAO/Jet、VBSQL/DBLib以及ODBC的优点的对象(Object)。
需要强调的是,RDO是包裹着ODBC
API的一层薄薄的外壳,被设计成在后台(服务器端)有数据库存在的前提下
运行,同时也是针对SQL Server和Oracle而特别设计的。
RDO的优势在于它完全被集成在VB之中。此外,直接访问SQL Server存储过程
、完全支持TQL、TQL调试集成在开发环境中、Visual Database Tools的
集成化等,也是RDO的长处。

RDO之后是ADO

Microsoft公司已宣布今后不会对VBSQL/DBLib进行升级,而ODBC
API函数一级的编程方式也不为人们所喜爱。RDO自身今后将被以ActiveX技术
为基础的ADO(ActiveX Data O bjects)所替代。Visual
Basic下一个版本中由哪一个作为标准配置还不很明确,但这一发展趋势已经
很清楚。 为什么需要ADO呢?RDO是以ODBC为基础,而ADO则是基于全新的OLE
DB技术。ODBC本身是以SQL Server、Oracle等关系数据库作为访问对象;OLE
DB则不仅限于此,而将是可以对电子邮件、文本文件、复合文件、数据表等各
种各样的数据通过统一的接口进行存取的技术。DAO、RDO当然不会一下子消
失,但随着新技术的利用,它们的作用将逐步淡化。

RDO的对象模块图

要正确地使用RDO,有必要对其对象模块结构加以理解。在RDO的对象和集合
中,有很多对数据库的状态和设定进行操作的属性(Property),以及对数据
库进行操作的方法(Method)。利用这些,从RDO2.0起就可以开发事件驱动的
数据库应用程序。
RDO对象与VB中其他对象的概念相同。与VB用的ActiveX控件(以往称为
Custom Control或OCX、VBX)相似的是,RDO也带有属性和方法;但同
Spread、InputMan等普遍应用的ActiveX控件不同的是,RDO没有自己的用户界
面,因而可以和VB标准的Timer控件归为同一类。当然也可以将RDO看作调用
ODBC API函数,进而对后台数据库操作加以控制的对象。在RDO的属性和方法
中,? 对单个的ODBC API函数以及一连串API函数的调用。

1. rdoEngine对象
最初调用RDO对象以及RDC(远程数据控件)时,自动生成rdoEngine对象的附
带事件(incident)。rdoEngine用于对RDO全局属性的参数、选项进行设置,
是在RDO的阶层结构内处于最上层的对象,包含了所有的其他对象。
rdoEngine对象与DAO/Jet不同,虽然被多个应用程序共享,但体现rdoEngine
对象的设定值的属性却并不共用,而是在各自的应用程序的程序界面中对其分
别加以设定。这些设定值对其他使用RDO以及RDC的应用程序没有任何影响。
rdoEngine不是集合的要素,而是重新定义的对象,rdoEngine对象不能被追加
作成。

2. rdoEnvironment对象
RDO对象在自动创建rdoEngine对象时,将rdoEnviroment对象的初始值生
成并保存为rdo
Enviroments(0)。一般情况下,应用程序中不必追加rdoEnvironment对象
,大多只需对已有的rdoEnviroments(0)进行操作就可以了。只有在支持
一个以上事务(Transaction),需要将用户名和口令信息分别处理的情况
下,利用rdoCreateEnvironment方法将特定的用户名和口令值作成新的
rdoEnvironment对象。在这个方法中可以指定固有名、用户名和口令,如
果所指定的值与rdoEnvironments集合的已经存在的成员名称相同,会产
生错误。新建的rdoEnvironment对象自动追加在rdoEnvironments集合的
最后。调用rdoCreateEnvironment方法时,其name参数可以是长度为0的
文字列,这时新的rdoEnvironment对象将不会被追加在rdoEnvi
ronments集合之中。
3.rdoConnection对象 rdoConnection对象用于同SQL Server的连接管理
,下面是与SQL Server连接的例子。
第一步用New关键字声明一个rdoConnection对象: Dim Cn as New
rdoConnection
由此生成独立连接对象,这时它还不是rdoConnection集合的成员。在
具体连接到SQL Server等之前,有必要设定rdoConnection集合的属性
。对此,使用With关键字编程效率会更好。
With CN
.Connect = “Uid = ; Pwd = ; Database = Pubs; DSN = MyPubsDSN;

' 设定Cursor类型
.CursorDriver = rdUseNone
'设定登录超时
.LoginTimeOut = 10 End With

用RDO与SQL Server连接和断开

RDO接口没有自动管理同SQL
Server的连接和断开的功能,需由程序员自己加以判断。这里需要注意的
是对连接和断开时机的管理,因为同时有过多的连接将会造成服务器负
载过重。而且,对SQLServer而言,一个连接只能同时支持一个操作,当
同时进行记录的读出和更新时,需要分别对其各自的连接加以确认。在
一定条件下需要保持连接;反之,当操作完成以后,又需要立即将连接
断开。如果能正确地设计好连接和断开的时刻,就有可能确保扩展更多
的用户数(客户/服务器开发环境中,与数据库项的可扩展性一样,客户
数扩张的可能性
备案号:鲁ICP备13029499号-2 说三道四 www.s3d4.cn 说三道四技术文摘