Access数据库访问技巧

1.数据库访问对象的概念

数据库访问对象（Data Access Object，DAO）提供如表、查询、关系和索引等对象，完成Access数据库中的数据管理功能，这些对象被称做数据访问对象，或称数据访问接口。它可以与其他使用Microsoft DAO的应用程序（如Excel）共享使用数据访问对象的Visual Basic代码，也可通过任何一个OLE DB提供者使用Jet和同步复制对象从数据库服务器中访问及处理数据除此以外，Access还定义了各式各样用来处理数据的对象，如窗体、报表和控件。其主要是提供不同系统的数据共享。

2.DAO的模型结构

DAO结构是一个分层结构，其中Dbengine处于底层。用户在使用时，通过设置对象变量，并通过对象变量来调用访问对象、设置访问对象属性，从而实现对数据库的各项访问操作。图10-42所示为DAO模型简图。

各层次对象说明：

（1）Dbengine为数据库引擎。

（2）Workspace（s）为工作区。

图10-42 DAO模型简图

（3）Database（s）为数据库对象。

（4）Recordset（s）为数据操作返回的记录集。

（5）Field（s）为记录集中的字段信息。

（6）Querydef（s）为数据库查询信息。

（7）Error（s）为出错处理。

3.引用对象库

在当前的Access系统若引用其他系统的对象数据库，还要考虑Access的版本及其所支持的引用对象。Access2002的DAO引用库为“Microsoft DAO教育3.6”，引用前需将其添加。

添加引用对象库的操作步骤如下：

（1）进入VBE窗口，选择“工具”菜单下的“引用”命令，如图10-43所示，弹出“引用”对话框，如图10-44所示。

图10-43 使用“工具”菜单的引用示意

图10-44 “引用”对话框

（2）在“引用”对话框中查找可引用的对象，找到之后选中并单击“确定”按钮即可。

4.使用DAO访问数据库

使用DAO访问数据库的步骤如下：

（1）创建对象变量。

格式：Dim 变量名 As DAO 对象名

例如：

Dim wo As workspace(www.xing528.com)

Dim da As Database

Dim re As Recordset

（2）通过Set语句设置对象变量的值。

格式：Set对象变量名＝常量或赋值的变量

例如：

Set wo＝Dbengine.workspace（0） ′打开默认工作区

Set da＝WO.OpenDatabase（学生信息管理系统） ′打开数据库文件

Set re＝DA.OpenRecordset（学生信息表） ′打开数据表

（3）关闭数据库、记录集。

格式：对象变量名.Close

例如：da.Close re.Close ′关闭数据库、记录集

（4）回收对象变量的内存。

格式：Set对象变量名＝Nothing

例如：

Set re＝Nothing

Set da＝Nothing

【例10.10】修改“学生信息管理系统”数据库中的成绩表（将奖学金增加10元），该程序的代码如图10-45所示，模块名为“例题10 DAO1”。

操作步骤如下：

（1）首先建立一个模块。

（2）再建立引用。

（3）在模块中插入一个过程，在过程中输入图10-45所示的代码。

图10-45 例10.10的程序代码

（4）程序输入完成后，当运行时发现错误，则可使用调试中的“逐语句”加以调试。

（5）运行完毕，回到数据库窗口，打开程序中修改的表，检查是否完成了修改。