第11章ADO数据库访问技术

1、Oracle 10g歎据岸孩用敬程授课教师: 职务：第11章ADO数据访问技术课程描述ADO是目酋比较淹行的 访问技术.它使用更切筒融貝 活的对适用于各种程 序设计语言.在本书实侧中. 使用Visual Basic开发的实侧 就是基于ADOft访问技术实 現的.本章知识点ADO数据模型数据库访问控件 常用ADO对象11.1 ADO数据模型ADO提供执行以下操作方式: 连接到数据源。口指定访问数据源的命令，可以在命令中指定参数。通常涉及ADO的Command对象。口执行命令，例如一个SELECT脚本。口在适当惰况下，可以把缓存行的更改内容写回数据库 中，更新数据源。口提供常规方法检测错误（错误通

2、常由建立连接或执行命令造成），涉及ADO的Error对象。ADO编程模型的元素(1) 连接。(2) 命令。(3) 参数。记录集。(5) 字段。(6) 错误。(7) 属性。(8) 集合。(9) 事件。ADO支持以下4种类型的集合 Connection对象具有Errors集合，包含响应与数据源有关的单一错误而创建的所有Error对象。 Command象具有Parameters集合，包含应用于 Command对象的所有Parameter对象。 Recordset对彖具有Fields集合，包含Recordset对 象中所有列的Field对象。 此外，Connection、Command、Records

3、et和Field对 彖都具有Properties集合，它包含各个对象的 Property 对彖。ADO支持以下两种事件 ConnectionEvents ConnecttionEvents事件在以下1#况下发生连接中的事务开始、被提交或被回滚.口执行命令.连接的开始或结束.此事件用于对连接状态变化的报告. Recordset EventsRecordsetEvents事件在以下情况下发生：在Recordset对彖的行中进行定位.更改记录集行中的字段.更改记录集中的行.在整个记录集中进行更改.11. 2数据库访问控件ADO Data控件。DataList 控件。 DataCombo 控件。Dat

4、aGrid 控件。11.2. 1 ADO Data控件(1) 选择“工程”菜单中的44部件”命令.打开“部件”属性对话框(2) 在控件列表中.査找并选择Microsoft ADO Data Controls 6.0(OLEDB),如图】1.1所示.如果在列表中没有此选项，请下载并安装Visual Basic 6.0的升级补丁 (VS6SP5) (3) 的击“确定片按钮.可以看到ADO Data控件的图标出现在“工具 箱中.如图11. 2所示.y yMrr-w X OWwv % j rifTT *ADO Data控件的常用属性 BOF Connect i onStri ng Connection

5、Timeout EOF MaxRecords Mode Password Recordset RecordSource UserName【例11. 1 ADO Data控件的示例程序在窗体FormMain中使用一个ADO Data控件读取表Users中的 数据.并通过文本框显示各个字段的数据单击ADO Data控 件中的前后移动按钮可以改变当前记录的位置.文本框的 内容也会自动地发生变化。设置主窗体属性an说明（名称）FormMainBorderStyle1 - Fixed SingleCaption显示部门信息StartUpPosition2-屏幕中心设置ADO DataB件的属性在窗体Fr

6、mMain中添加控件ADO Data,控件名为Adodcl。右键单击ADO Data控件，选择菜单中的“ADODC属性”命令，打开“属性页”窗口，设置ADO控件属性 在“连接资源”选项中选择“使用连接字符串”，然后单击“生成”按钮，打开“数据链接属性”窗口。设置ADO控件属性选择Oracle Provider for OLE DB”，单击下一 步”按钮，打开“连接”页面。设置数据源为orcl, 然后输入用户名USERMAN和对应的密码。设置标签和文本框的属性控件名属性设置值Label 1Caption用户编号:Label2Caption用户名称：TextlDataSourceAdodclDat

7、aFieldUSERIDText空Text2DataSourceAdoddDataFieldUSERNAMEText空11. 2. 2 DataList控件和DataCombo控件选择“工程”菜单中的“部件”命令，打开“部件”属性对话框 在控件列表中査找并选择Microsoft DataList Controls 6.0 (0LEDB-单击“确定”按钮，可以看到DataList控件和 DataCombo控件的图标出现在“工具箱”中.DataList控件和DataCombo控件常用属性 BoundColumn BoundText DataField DataSource ListField Ro

8、wSource Selectedltem示例程序 此工程包含一个窗体FormMain,窗体中包含了一个 ADO Data件、一个DataCombog件和一个DataList 控件。DataCombo控件和DataList控件分别显示表 Users中所有的用户占称。ADO Data控件的属性属性1|设置值ConnectionstringPro vider=OraOLEDB.Oracle：Password USERMAN :PcrsistSecurityInfo=True:UserID=USERMAN:DataSource=orcl （可以由系统fl动生成）CursorTypc2 - adOpcn

9、DynamicRecordSourceSELECT * FROM Usere ORDER BY USERIDVisibleFaiseDataCombo控件的属性属性设置值RowSourceAdodc1ListFieldUserNameBoundColumnUseridStyle2 - dbcDropdownList （设代组合框的类熨, 用户只能选择组合框中的数据）DataList控件的属性属性设置值RowSourceAdodc 1ListFieldUserName11. 2. 3 DataGrid控件 选择“工程”菜单中的“部件”命令，打开“部件” 属性对话框。在控件列表中，査找并选择Mic

10、rosoft DataGrid Controls 6. 0 (OLEDB).目m:5启-J 2 囚、园豐Q旷示例程序 此工程名为DataGrid包含两个窗体，一个是便用 DataGrid控件显示数据的FormDataGrid窗体，这也 是工程的主窗体；另一个是FormShowData窗体，它 用来演示如何从DataGrid控件的表格中读取一行数 据的具体内容。设置主窗体属性属性说明（名称）FormMainBorderStyle1 - Fixed SingleCaption用户信息表StartUpPosition2-屏幕中心ADO Data控件的属性属性设置值ConnectionStringPr

11、ovidcr=OraOLEDB.Oraclc. 1: Pass word=USERMAN;Persist Security Info=True;User lD=USERMAN;Data Sourcc=orclCursorType2 - adOpenDynamicRecordSourceSELECT * FROM UsersVisibleFalseart./WT0WA lJ It i 色I UM I 初 I添加DataGr i d控件并设置属性CMrg見 rmhl匕 MoveLast MoveNext和 MovePrevious方法：在指定的 Recordset对象中移动到第一个、最后一 个、下

12、一个或前一个记录并使该记录成 为当前记录。Open方法使用Open方法可打开代表基本表、査询结果或者以前 保存的Recordset中记录的游标。Open方法的语法如下recordset. Open Source. ActiveConnec tion9 CursorType, LockType. Options口 Soac堤记录源，它可以是一条SQL语句.一个表或一 个存储过程等。 Ac ti veConnec tionf 定相应的 Connection 对象。 drsor加e指定打开Recordset时使用的游标类型。 LockType定打开Recordset时应该使用的锁定类型。 Option定Scwzre参数的类型。Operi方法中Cursor属性的值吊51jiiOpfiiForw(WtiAfll)打幵仅向前娄型硏标ad(pcnKc sei打开键堂契胞游杯jJQpvuDyndrnjc打开动占養节谕标jLiOpcnSr.iiK打开静爲类轉游标Open方法中Options属性的值常量adCmdText adCmdTable说明将Source视 为命令 生成SQL查询从在Source中命名的表中返回所 有行adCmdTableDirect直 接从在Source中命名的表中返回所有行 adCmdStoredProc将Source视为存储过