第9章VBA的数据库编程.ppt

VBA的数据库编程 第9章 VBA的数据库编程 本章主要内容 9.1 数据库访问接口 9.1 数据库访问接口（续） 9.2 数据访问对象（DAO） 9.2.1 DAO模型结构 9.2.2 DAO对象变量的声明和赋值 2．对象变量的赋值 例10-1 例10-1 （续） 9.2.3 DAO对象的部分属性和方法 2．TableDef 对象的CreateField方法 3．RecordSet 对象的常用属性和方法 9.2.4 利用DAO访问数据库 例10-2 （DAO数据库编程例） 例10-2 VBA代码 例10-3 （DAO数据库编程例） 例10-3VBA 代码 例10-4 （DAO数据库编程例） 例10-4VBA 代码 9.3 ActiveX数据对象（ADO） 9.3.1 ADO模型结构 ADO模型结构图 9.3.2 ADO对象变量的声明 9.3.3 ADO对象的部分属性和方法 2．RecordSet 对象的常用属性和方法 表10-8 RecordSet对象的常用属性 表10-9 RecordSet对象的常用方法 3．Command 对象的常用属性和方法 表10-10 Command对象的常用属性 表10-11 Command对象的常用方法 9.3.4 利用ADO访问数据库 例10-5 （ ADO数据库编程例子 ） 例10-6 VBA代码 表10-7 ADO对象说明 ADO 对象必须通过 VBA 程序代码来控制和操作。在代码中，必须设置对象变量，然后再通过对象变量使用其下的对象、或者对象的属性和方法。 声明对象变量的语句格式： Dim 对象变量名称 As ADODB.对象类型 例如： Dim con As New ADODB.Connection ‘声明一个连接对象变量 Dim res As New ADODB.RecordSet ‘声明一个记录集对象变量 注意，ADODB 是 ADO 类型库的短名称，用于识别与DAO中同名的对象。例如，DAO中有 RecordSet 对象，ADO 中也有 RecordSet对象，为了能够区分开来，在 ADO 中声明RecordSet 类型对象变量时，用上 ADODB.RecordSet。总之，在ADO中声明对象变量时，一般都要用上“ADODB.”前缀。 1．Connection 对象的常用方法 （1）Open方法 通过使用Connection 对象的Open方法来建立与数据源的连接。 Open方法的语句格式： Dim 连接对象变量名 As New ADODB.Connection 连接对象变量名.Open ConnectionString, UserID, Password, OpenOptions 例如，创建与罗斯文示例数据库“Northwind.mdb”连接的语句： Dim cnn As New ADODB.Connection ‘声明一个连接对象变量 cnn cnn.Open Provider = Microsoft.Jet.OLEDB.4.0; Data Source = C:\Program Files\Microsoft Office\OFFICE11\SAMPLES\ Northwind.mdb （2）Close方法 通过使用 Connection 对象的 Close 方法来关闭与数据源的连接。 Close方法的语句格式： 连接对象变量名.Close 注意，该语句可以关闭Connection 对象，断开应用程序与数据源的连接。但是Connection 仍在内存中，释放 Connection 对象变量的方法是使用下面语句格式的语句： 释放连接对象变量的语句格式： Set连接对象变量名= nothing 例如，关闭与“罗斯文示例数据库.mdb”连接的语句： cnn. Close Set cnn = nothing （3）如果指定的数据源就是当前已经打开的数据库，则必须通过 CurrentProject 对象的Connection属性来取得连接。 语句格式： Dim 连接对象变量名 As New ADODB.Connection Set 连接对象变量名= CurrentProject.Connection 例如：创建与当前已经打开的数据库的连接： Dim cnn As New ADODB.Connection Set cnn = Current