用VB和RDO访问SQL Server

RDO的发展
远程数据对象 (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 AP I在速度方面性能很好，但它需要花费很大的精力进行繁琐的编程工作。 当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－SQL、T－SQL调试集成在开发环境中、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等普遍应用的Activ eX控件不同的是，RDO没有自己的用户界面，因而可以和VB标准的Timer控件归为同一类。当然也可以将RDO看作调用ODBC API函数，进而对后台数据库操作加以控制的对象。在RDO的属性和方法中，包含了对单个的ODBC API函数以及一连串API函数的调用。

1. rdoEngine对象 最初调用RDO对象以及RDC（远程数据控件）时，自动生成rdoEngine对象的附带事件（i ncident）。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集合的已经存在的成员名称相同，会产生错误。新建的rdoEnvi ronment对象自动追加在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的连接和断开的功能，需由程序员自己加以判断。这里需要注意的是对连接和断开时机的管理，因为同时有过多的连接将会造成服务器负载过重。而且，对SQL Server而言，一个连接只能同时支持一个操作，当同时进行记录的读出和更新时，需要分别对其各自的连接加以确认。在一定条件下需要保持连接；反之，当操作完成以后，又需要立即将连接断开。如果能正确地设计好连接和断开的时刻，就有可能确保扩展更多的用户数（客户/服务器开发环境中，与数据库项的可扩展性一样，客户数扩张的可能性也非常重要）。 由于RDO是基于ODBC，它通过ODBC的数据源名(DSN: Data Source Name)与SQL Server相连。DSN的信息可以基于文件，也可以在连接时通过传递的参数指定。不过，一般来说，不推荐基于文件的DSN，因为一旦DSN文件被破坏，或者被误删除，设定起来就非常麻烦。通过 DSN对SQL Server的连接方式一般有以下几种： ?

标签：

版权申明：本站文章部分自网络，如有侵权，请联系：west999com@outlook.com
特别注意：本站所有转载文章言论不代表本站观点，本站所提供的摄影照片，插画，设计作品，如需使用，请与原作者联系，版权归原作者所有