2016计算机应用技术-Access（邮电版）教案：实验11VBA对象和数据库访问技术.docVIP

课程教案 课题： 第10章 模块与VBA程序设计（3） 实验11 VBA对象和数据库访问技术 授课类型 理论课 授课时间 第16周第1-4节 教学目标：掌握VBA数据库访问技术；掌握VBA程序调试技术 教学要点：VBA数据库访问技术；VBA程序调试技术 教学重点：VBA数据库访问技术。 教学难点：VBA数据库访问技术。 教学手段与方法：讲解法，操作演示法 教学过程： 第10章 模块与VBA程序设计（3） 10.5 VBA数据库访问技术 10.5.1 常用的数据库访问接口技术 常用的数据库访问接口技术包括ODBC、DAO和ADO等。 1．ODBC API ODBC（Open Database Connectivity，开放数据库互连）是Microsoft公司开放服务结构（WOSA，Windows Open Services Architecture）中有关数据库的一个组成部分，它建立了一组规范，并提供了一组对数据库访问的标准API（应用程序编程接口）。这些API利用SQL来完成其大部分任务。ODBC本身也提供了对SQL语言的支持，用户可以直接将SQL语句送给ODBC。 2．DAO DAO（Data Access Objects）即数据访问对象，是VB最早引入的数据访问技术。它普遍使用Microsoft Jet数据库引擎（由Microsoft Access所使用），并允许VB开发者像通过ODBC对象直接连接到其他数据库一样，直接连接到Access表。DAO最适用于单系统应用程序或小范围本地分布使用。 3．ADO ADO（ActiveX Data Objects）又称为ActiveX数据对象，是Microsoft公司开发数据库应用程序面向对象的新接口。ADO是DAO/RDO的后继产物，它扩展了DAO所使用的对象模型，具有更加简单，更加灵活的操作性能。ADO在Internet方案中使用最少的网络流量，并在前端和数据源之间使用最少的层数，提供了轻量、高性能的数据访问接口，可通过ADO Data控件非编程和利用ADO对象编程来访问各种数据库。 10.5.2 ADO对象模型 ADO对象模型定义了一个分层的对象集合，如图10-11所示。 图10-11 ADO对象模型 ADO对象模型所提供的9个对象功能说明如表10-11所示，其中Connection、Commnand和RecordSet这3个对象是ADO对象模型的核心对象。 要想在VBA程序中使用ADO，则必须首先添加对ADO的引用。要添加对ADO的引用，只需要依次选择VBE窗口的“工具”→“引用”菜单命令，在弹出的“引用”对话框中选择“Microsoft ActiveX Data Objects 2.1 Library”选项即可。 10.5.3 利用ADO访问数据库的基本步骤 在VBA中利用ADO访问数据库的基本步骤为： 1．数据库连接对象（Connection） 在VBA中，通过ADO访问数据库的第一步就是要建立应用程序与数据库之间的连接。 Connection使用前必须声明，声明的语法格式如下： Dim cnn As ADODB.Connection 在Connection对象声明后，需实例化Connection对象后才能使用，代码如下： Set cnn=New ADODB.Connection Connection对象的主要属性有ConnectionString、DefaultDatabase、Provider和State。 Connection对象的主要方法有：Close、Execute和Open。 例10-18 建立与Access 2003数据库的连接，包括连接对象的声明、实例化、连接、关闭连接和撤消连接对象。 Sub CreateConnection() Dim cnn As ADODB.Connection 声明连接对象 Set cnn = New ADODB.Connection 实例化对象 cnn.Open Provider= Microsoft.Jet.OLEDB.4.0;Persist Security Info=False; User ID=Admin;Data Source=D:\Access2003\教学管理.mdb; 打开连接 cnn.Close 关闭连接 Set cnn = Nothing 撤消连接 End Sub 连接对象的Close方法不能将对象从内存中清除，但将Connection对象设置为Nothing可以从内存中清除对象。以上代码中，打开当前数据库的连接也可以修改为以下代码： cnn.Open CurrentProject.Connection 2．数据集对