Access实例教程-攀枝花三中.ppt

Access实例教程;ACCESS实例教程 ;1，用ADO访问数据库 2，用DAO访问数据库 3，程序运行错误处理; 9.1 VBA数据库访问接口;2．DAO（Data Access Objects） DAO称为“数据访问对象”，是一种面向对象的界面接口，提供一个访问数据库的对象模型，用其中定义的一系列数据访问对象，实现对数据库的各种操作。使用DAO的程序编码非常简单。 3．ADO（ActiveX Data Objects） ADO称为“Active数据对象”，是基于组件的数据库编程接口。ADO实际是一种提供访问各种数据类型的连接机制，是一个与编程语言无关的COM（Component Object Model）组件系统。ADO设计为一种极简单的格式，可以方便地连接任何符合ODBC标准的数据库。 ; 数据库引擎是一组动态链接库DLL（Dynamic Link Library），在程序运行时被连接到VBA，实现对数据库的数据访问功能。是应用程序与物理数据库之间的桥梁。 VBA通过DAO和数据引擎可以识别3类数据库： 1．本地数据库：即Access数据库。 2．外部数据库：所有索引顺序访问方法（ISAM）数据库，如VFP。也可以访问文本文件数据库和Microsoft Excel或Lotus1-2-3电子表格。 3．ODBC数据库：符合ODBC标准的C/S数据库，如SQL Server、Oracle。;9.2.1 DAO模型结构;3.2 统配符、运算符与常用函数;9.2.3 用DAO访问数据库;Do While not rs.EOF 循环遍历整个记录集直至记录集末尾 …… 对字段的各种操作 rs.MoveNext 记录指针移到下一条 Loop 返回到循环开始处 rs.close 关闭记录集 db.close 关闭数据库 set rs=nothing 释放记录集对象变量所占内存空间 set db=nothing 释放数据库对象变量所占内存空间 说明： 如果是本地数据库，可以省略定义Workspace对象变量，打开工作区和打开数据库两条语句用下面一条语句代替： Set db = CurrentDb() 该语句是Access的VBA给DAO提供的数据库打开快捷方式。 ;例：用DAO访问数据库;（4）给命令按钮的单击事件写代码如下： Dim db as DAO.Database 定义Database对象变量 Dim rs as DAO.Recordset 定义Recordset对象变量 Dim fd as DAO.Field 定义Field对象变量 Set db = CurrentDb() 建立与当前数据库的连接 Set rs = db.OpenRecordset(gz) 建立与gz表的连接 Set fd = rs.Fields(工资) 设置对“工资”字段的引用 Do While Not rs.EOF 如果指针没有到最后就执行循环体 rs.Edit 使rs处于可编辑状态 fd = fd + fd * 0.1 给指定字段值增加10% rs.Update 更新表;rs.MoveNext 向下移动指针 Loop 返回到循环开始处 rs.MoveFirst 指针移到第一条记录 t1 = rs.Fields(姓名) 将姓名字段的值显示在t1中 t2 = rs.Fields(工资) 将工资字段的值显示在t2中 rs.Close db.Close Set rs = Nothing Set db = Nothing;（5）转到窗体视图→单击命令按钮，可以看到t2文本框中显示第一条记录更新后的工资值。 ;9.3 用ADO访问数据库;9.3.2 ADO对象简介;9.3.3 用ADO访问数据库;loop 返回到循环开始处 rs.close 关闭记录集 cn.close 关闭连接 set rs=nothing