红皮书五个例子中最重要的就是,ADO(ActiveX Data Objects)可以简单的理解为ADO是一种面向对象的编程接口,访问数据库的接口。
ADO中的常用的七个对象(三个独立对象,四个依赖对象)
三个独立对象
Command :连接对象
主要用来与数据库建立联系,连接数据库常用的两种Open 和 Close
Dim objCn As Connection
objCn.Open
objCn.Close
Connection :命令对象
执行命令操作,数据的查询,修改,添加,删除。
Dim objCmd As Command
objCmd("用户名") = "%" & txtUser & "%" '获得查询参数
Recordset :记录集对象
保存来自表或命令对象返回的结果
Dim objrs As New Recordset
Dim objDataSource As New Recordset
'创建一个局部Recodset对象保存objRs当前记录页数据
For intrecord = 0 To objrs.Fields.Count - 1
objDataSource.Fields.Append objrs.Fields(intrecord).Name, adVarChar, _
objrs.Fields(intrecord).DefinedSize
四个依赖对象(依赖于独立对象才能使用)
Field:字段对象,依赖于记录集对象使用,可以使用Fields集合来过记录集中的每个字段的信息。
Dim objRs As New Recordset
MSFlexGrid1.Cols = objRs.Fields.Count
Parameter:参数对象,依赖命令对象使用,用于为参数查询提供数据。
Dim objCmd As Command
'为Command对象objCmd创建参数
Dim Parm As New Parameter
Set Parm = objCmd.CreateParameter( 名",adVarChar, adParamInput, 10)
Error:错误对象,依赖连接对象使用,如果发生错误,错误信息就保存到连接对象的Errors集合中。使用错误对象来定义相应的错误措施,避免程序再执行的过程中意外终止。
Property:属性对象,每个连接对象,命令对象以及字段对象都有一份属性对象集合。使用属性对象可以访问特定对象的主要信息。例:获得数据库中表中的列
最后附上一张流程图
现阶段只是对ADO对象做了一个浅显的了解,
在以后的学习中不断深凿。