第六章 ADO数据库技术及应用

1、第一，ado数据库技术概述，第一，ADO概述ActiveX数据对象(ADO)是Microsoft最新的数据访问技术。与新的数据访问层OLE DB Provider配合使用，旨在提供通用数据访问。OLE DB是底层数据访问接口，通过它可以访问各种数据源，包括现有关系数据库、电子邮件系统和用户定义的业务对象。第6章ADO数据库技术和应用程序，ADO提供了我们熟悉的高级OLE DB自动化软件包接口。对于熟悉RDO的程序员，可以将OLE DB与ODBC驱动程序进行比较。ADO对象是OLE DB的接口，就像RDO对象是ODBC驱动程序接口一样。其他数据源需要唯一的ole db提供程序(OLE DB提供程

2、序)，就像其他数据库系统需要唯一的ODBC驱动程序一样。目前，OLE DB提供程序相对较少，但Microsoft正在积极宣传此技术，并希望用OLE DB替换ODBC。2，基本ADO编程模型，ADO提供连接数据源的方法。您还可以验证对数据源的所有更改是成功还是未发生。指定存取资料来源的命令以及变数参数，或最佳化执行。执行命令。如果此命令使数据按表中的行返回，则这些行将存储在易于检查、操作或更改的高速缓存中。可以根据需要使用缓存行中的更改更新数据源。通常，设置连接或执行命令以检测错误的一般方法。3，具有每个Connection、Command、Recordset和Field对象的Propertie

3、s集合的ADO对象模型。4，ADO编程模型详细信息，以下元素是ADO编程模型的核心部分：连接：允许您通过连接在应用程序中访问数据源，连接是交换数据所需的环境。应用程序可以通过Microsoft internet information server等介质直接(也称为双层系统)或间接(也称为三层系统)访问数据源。对象模型使用Connection对象来细化连接概念。命令：在已建立的连接上执行的“命令”可以任何方式操作数据源。通常，命令可以添加、删除或更新数据源中的数据，或从表中以行格式检索数据。物件模型使用Command物件来反映指令概念。Command物件可让ADO最佳化指令的执行。参数：通常，

4、命令所需的变量部分是“参数”，在发布命令之前可以对其进行更改。例如，您可以重复运行相同的数据检索命令，但每次都可以更改指定的检索信息。参数对于执行行为与命令类似的命令非常有用，因此，用户可以知道命令的作用，但不需要知道它是如何工作的。对象模型使用Parameter对象反映参数概念。记录集：如果命令是按表中的信息行返回数据的查询(行返回查询)，则该行存储在本地。对象模型将此存储库作为Recordset对象实施。但是，没有仅表示单个Recordset行的对象。记录集是检查和修改行中数据的最重要方法。使用Recordset物件：指定要检查的列。移动行。指定移动行的顺序。添加、更改或删除行。变更列以更

5、新资料来源。管理Recordset的整体状态。字段：记录集行包含一个或多个“字段”。如果以二维网格的形式查看记录集，则字段构成“列”。每个字段(列)都具有包含数据源中实际数据的名称、数据类型和值的属性。物件模型以Field物件反映栏位。错误属性集合事件、5、使用对象的ADO编程模型、ADO的目标是访问、编辑和更新数据源，而编程模型反映了完成这些目标所需的一系列操作的顺序。ADO提供连接到数据源(Connection)和(可选)开始事务的类和对象。(可选)创建对象以表示SQL命令(Command)。可以选择在SQL命令中将列、表和值指定为变量参数(Parameter)。执行命令(Command、

6、Connection或Recordset)。如果命令逐行返回，则缓存行(Recordset)。您可以创建缓存视图来排序、过滤和定位数据(Recordset)。通过添加、删除或更改行和列来编辑数据(Recordset)。如果适用，使用缓存中的更改更新数据源(Recordset)。如果使用了事务处理，则可以接受或拒绝在完成事务处理过程中所做的更改。终止事务(Connection)。6、Connection对象和Connection对象表示与数据源的打开连接。使用Connection对象集合、方法和属性打开连接之前，请使用ConnectionString、ConnectionTimeout和Mode

7、属性配置连接。设定CursorLocation属性以呼叫支援批次更新的从属端游标提供者。使用默认数据库属性设置连接的默认数据库。使用提供程序属性指定OLE DB提供程序。使用Open方法建立与数据源的物理连接。使用关闭方法将其断开。使用Execute方法对连接执行命令，使用CommandTimeout属性配置执行。使用Errors集合检查从数据源返回的错误。通过Version属性读取正在使用的ADO运行的版本。使用OpenSchema方法获取数据库架构信息。ADO中Connection对象的多种连接方法和格式：静态ODBC数据源DSN连接动态ODBC基于数据的连接OLEDB数据提供程序连接方法

8、示例：7，Recordset对象，Recordset对象表示基表或命令执行结果的完整记录集。Recordset对象指向的当前记录是集合中任意时刻的单个记录。您可以使用Recordset物件操控provider中的资料。使用ADO时，您几乎可以透过Recordset物件操控所有资料。所有Recordset对象都是使用记录(行)和字段(列)组织的。根据提供程序支持的功能，某些Recordset方法或属性可能无效。Recordset的主要操作功能包括：例如，打开Recordset时，当前记录位于第一个记录(如果存在)中，并且BOF和EOF属性设置为False。如果没有记录，则BOF和EOF属性设置为

9、True。假定提供程序支持相关功能，您可以使用MoveFirst、MoveLast、MoveNext和MovePrevious方法以及Move方法和AbsolutePosition、AbsolutePage和Filter属性重新确定当前记录的位置使用Move方法访问每个记录或枚举Recordset时，可以使用BOF和EOF属性检查移动是否超出了Recordset的开头或结尾。Recordset对象可以支持两种类型的更新：立即更新和批处理更新。使用立即更新，调用Update方法时，对数据所做的所有更改将立即写入主数据源。还可以使用AddNew和Update方法将值的数组作为参数传递，并同时更新多

10、个记录的字段。如果提供程序支持批量更新，则提供程序可以缓存多个记录中的更改，然后使用UpdateBatch方法将这些更改从单个调用传递到数据库。此情况适用于使用AddNew、Update和Delete方法所做的更改。调用UpdateBatch方法时，可以使用Status属性检查并解决所有数据冲突。8、Command对象(ADO)和Command对象的主要目的是运行参数化存储过程。其格式可以是临时就绪或持续预编译的SQL语句。的格式。的格式是“临时就绪”(prepared)或“持续预编译”(precompiled)的SQL语句。如果要保存(保存)一个或多个查询以便在同一Connection中多次

11、运行，则Command对象也很有用。创建Recordset的有效方法是绕过Command对象并创建Recordset .使用Open方法。、第二、ADO应用程序技术、1、ADO数据库连接。静态ODBC数据源DSN连接示例：cnnData。Open DSN=Data _ NwindUID=；PWD=；动态ODBC基于数据的连接示例：CNNs data . opendriver=Microsoft access driver _(* .MDB)；Dbq=persist security info=false，创建ado数据库连接想法，定义全局数据库连接变量，自动创建连接参数通过Connection

12、String，Conn.Open调用连接参数，数据库连接通道设置成功，2data source=persist security info=false set rst link=new adodb . recordset rsts link . openselect * from课程信息表，cnLink，3value=text 1(I)next rst link . update rst link . close，2，显示记录，1)通过数据库连接设置查询条件写入SQL查询语句通过rst对象打开相应的表，运行查询，将记录集结果返回到界面中的变量中的查询，然后返回查询结果。2)返回查询结果data

13、 source=persist security info=false set rst link=new adodb . recordset rsts link . open select * from课程信息表where课程名称=数字text=if rst link (I) then text 1 (I)。text=rst链接(I)。value next rst link.close，3，如何移动导航记录，1)通过数据库连接设置祖怀条件构建SQL祖怀语句通过rst对象打开相应的表，然后运行查询以查找符合祖怀条件的记录通过四个按钮运行rst move first、MoveLast、MoveNe

14、xt和MovePreviousselect case int choice case 1 rst temp . move first case 2 rst temp . move last case 3 rst temp . move next if rst temp . eof then msgbox already at end of recordsrst temp . move last end if case 4 rst temp . move previous if rst temp . BOF then msgbox already at beginning of recordset！Rst temp . move first end If select end sub，4，删除记录，1)通过idea 1数据库连接设置祖怀条件编写SQL删除语句删除警告通过rst对象打开相应的表，然后通过delete命令执行ideo 2数据库连接设置conn.Excute(SQL)直接删除命令，vbOKCancel vbQuestion，警告)Then cnnData。Execute delete from基本信息表where ID=11 End If，If vbOK=MsgBox(是否确实要删除此记录？vbOKCancel vbQuestion，警告)Then rstData。Ope