vba访问数据库.pptVIP

VBA的数据库编程 1.数据库引擎及其接口 Microsoft Office VBA是通过Microsoft Jet数据库引擎工具来支持对数据库的访问。所谓数据库引擎实际上是一组动态链接库(DLL)，当程序运行时被连接到VBA程序而实现对数据库的数据访问功能。数据库引擎是应用程序与物理数据库之间的桥梁，它以一种通用接口的方式，使各种类型物理数据库对用户而言都具有同一的形式和相同的数据访问与处理方法。 在Microsoft Office VBA中主要提供了3种数据库访问接口：开放数据库互连应用编程接口(Open Database Connectivity API，ODBC API)、数据访问对象(Data Access Objects，DAO)和ActiveX数据对象(ActiveX Data Objects，ADO)。 ODBC ODBC API：目前Windows提供的32位ODBC驱动程序对每一种客户机/服务器RDBMS、最流行的索引顺序访问方法(ISAM)数据库(Jet、dBase、Foxbase和FoxPro)、扩展表(Excel)和划界文本文件都可以操作。在Access应用中，直接使用ODBC API需要大量VBA函数原型声明(Declare)和一些繁琐、低级的编程，因此，实际编程很少直接进行ODBC API的访问。 DAO DAO：提供一个访问数据库的对象模型。利用其中定义的一系列数据访问对象，如Database、QueryDef、RecordSet等对象，实现对数据库的各种操作。这是Office早期版本提供的编程模型，用来支持Microsoft Jet数据库引擎，像开发者通过ODBC直接连接到其他数据库一样，连接到Access数据库。DAO最适用于单系统应用程序或在小范围本地分布使用，其内部已经对Jet数据库的访问进行了加速优化，而且使用起来也是很方便的。所以如果数据库是Access数据库且是本地使用的话，可以使用这种访问方式。 ADO ADO：是基于组件的数据库编程接口，是一个和编程语言无关的COM组件系统。使用它可以方便地连接任何符合ODBC标准的数据库。 Microsoft Office 2000及以后版本应用程序均支持广泛的数据源和数据访问技术，于是产生了一种新的数据访问策略：通用数据访问(Universal Data Access，UDA)。用来实现通用数据访问的主要技术是称作OLE DB(对象链接和嵌入数据库)的低级数据访问组件结构和称为ActiveX数据对象ADO的对应于OLE DB的高级编程接口。 3.数据访问对象(DAO) (2)利用DAO访问数据库 通过DAO编程实现数据库访问时，首先要创建对象变量，然后通过对象方法和属性来进行操作。下面给出数据库操作一般语句和步骤： 程序段： 定义对象变量 Dim ws As Workspace Dim db As Database Dim rs As RecordSet 通过Set语句设置各个对象变量的值 Set ws = DBEngine.Workspace(0) 打开默认工作区 Set db = ws.OpenDatabase(数据库文件名) 打开数据库文件 Set rs = db.OpenRecordSet(表名、查询名或SQL语句) 打开数据记录集 Do While Not rs.EOF 利用循环结构遍历整个记录集直至末尾 ‥‥‥ 安排字段数据的各类操作 rs.MoveNext 记录指针移至下一条 Loop rs．close 关闭记录集 db．close 关闭数据库 Set rs = Nothing 回收记录集对象变量的内存占有 Set db = Nothing 回收数据库对象变量的内存占有 ‥‥‥ 4.ActiveX数据对象(ADO) 利用ADO访问数据库一般过程和步骤是： ①定义和创建ADO对象实例变量。 ②设置连接参数并打开连接——Connection。 ③设置命令参数并执行命令(分返回和不返回记录集两种情况)——Command。 ④设置查询参数并打开记录集——RecordSet。 ⑤操作记录集(检索，追加，更新，删除)。 ⑥关闭、回收有关对象。 具体可参阅以下程序段分析