计算机二级ado程序..docVIP

ADO编程实验 【知识要点】 1、.ADO（ActiveX Data Objects动态数据对象）：是基于组件的数据库编程接口， 应用程序通过ADO访问不同数据源。 2、ADO对象模型：ADO对象模型是对ADO对象集合的完整概括，它能够更加灵活、有效地发挥ADO对象的功能特性。Recordset、Connection、和Command是ADO对象模型中的三个最核心对象，也是应用程序访问数据源时使用最多的三个对象。 3、Recordset(记录集)：用于存储来自数据库中基本表或命令执行结果的记录全集。Recordset对象中的数据在逻辑上由每行的记录和每列的字段组成，每个字段又表示为一个Field对象。 在使用Recordset对象之前，应声明并初始化一个Recordset对象： Dim rs As ADODB.RecordsetSet rs= New ADODB.Recordset 创建Recordset对象之后，就可以通过Recordset对象的Open方法获取数据源操作的记录集，Open方法语法如下： 记录集对象变量.Open Source, ActiveConnection, CursorType, LockType,Options CursorType参数 常量 参数值 说明 AdOpenForwardOnly 0 使用仅向前类型游标，只能在记录集中向前移动（默认值） AdOpenKeySet 1 使用键集类型游标，可以在记录集中向前或向后移动，但禁止查看或访问其他用户添加或删除的记录 AdOpenDynamic 2 使用动态类型游标，可以在记录集中向前或向后移动，允许查看或访问其他用户所做的添加、更新或删除 AdOpenStatic 3 使用静态类型游标，可以在记录集中向前或向后移动，其他用户所做的添加、更新或删除将不可见 LockType参数 常量 参数值 说明 AdLockReadOnly 0 只读，无法更改数据（默认值） AdLockPessimistic 1 保守式锁定（逐个），指编辑记录时立即锁定数据源的记录 AdLockOptimistic 2 开放式锁定（逐个），只在调用Update方法时才锁定数据源的记录 AdLockBatchOptimistic 3 开放式批更新 使用recordset完整格式： Dim rs As ADODB.Recordset Set rs = New ADODB.Recordset rs.Open SQL语句, CurrentProject.Connection, 2, 2 …… rs.Close Set rs = Nothing 也可以写为： Dim conn as adodb.connection Set conn = New ADODB. connection Dim rs As ADODB.Recordset Set rs = New ADODB.Recordset Dim straql as string Strsql=SQL语句 conn.Open CurrentProject.Connection rs.Open strsql, conn, 2, 2 …… …… rs.Close conn.Close Set rs = Nothing Set conn = Nothing Recordset对象对字段的引用：记录集对象变量（”字段名”）或者 记录集对象变量.fields（”字段名”） 如：rs(“字段名”) 或rs. fields（”字段名”） 注：如果记录集的数据为空，则引用时会出错，所以在引用前要判断记录集是否为空。 Recordset对象中常用的属性及方法： 记录集对象变量.BOF()：文件开始 记录集对象变量.EOF()：文件结束 记录集对象变量.addnew：添加新记录 记录集对象变量.Delete：删除当前记录 记录集对象变量.update： 将记录集中修改的记录更新到数据库 记录集对象变量.movefirst：指针指在第一条记录 记录集对象变量.movelast：指针指在最后一条记录 记录集对象变量.movenext：指针向后移动一条记录 记录集对象变量.MovePrevious：指针向前移一条记录 记录集对象变量. RecordCount：获取记录数 注：使用记录集对象变量. RecordCount方法时在currentproject.connection后的游标参数一般设置为1或3。 【实验内容】 打开“计算平均年龄”窗体，对窗体上的按钮编写事件代码，具体要求如下： 单击窗体上的“计算平均年龄”按钮，计算Student表中所有学生的平均年龄，并将结果显示在Text1文本框中。 打开窗体“平