主要的ADO对象 在上述众多对象中，主要的ADO对象有３个：连接对象Conection，数据查询对象Command和查询所得记录集对象Recordset。
Connection对象
Connection对象用于建立应用程序与数据源之间的通信连接。如果是网络环境下的客户端/服务器数据库系统，该对象可等价于客户机到数据库服务器的实际网络连接。在建立连接后，可通过Command对象与Recordset对象来访问数据库中数据。
Connection对象的主要属性
Connection对象的主要属性如表8-3所示。
Connection对象的常用方法
Connection对象的常用方法如表8-4所示，其中Open用于打开Connection对象，并建立连接。Excute方法常用于简单查询。对复杂的数据库操作应使用Command对象。
Recordset对象
Recordset对象（记录集对象）用于存储Connection对象和Command对象的查询结果，应用程序中再利用程序语言来处理该Recordset对象中的记录，Recordset对象主要属性见表8-5。
Recordset对象的常用方法
Recordset对象的常用方法见表8-6，其中Open用于打开Recordset对象，并对Command对象或Connetion对象加以引用。Recordset对象有11个事件，这里也不说明了。
Command对象
Command对象主要用于对数据库进行复杂查询，它的功能强大，并可运行存储过程和参数化查询。Command对象如表8-7所示。
Command对象
Command对象最常用方法是Excute方法。Excute方法用于执行SQL查询命令，并返回打开的结果集对象（Recordset）。也可以用Excute方法执行其它的数据定义命令或存储过程。
Connection,Command,Recordset虽然是3个不同的对象，但是三者之间是互相关联，分工协作的。通常，在Connection对象实现了应用程序与数据源之间的通信连接后，执行Command对象的Excute方法实现数据库查询，数据库服务器响应后，再将查询结果存入Recordset对象中。Command对象必须依赖于Connection对象，而Recortset对象要视Connection对象与Command对象的状态而定。
8.2 在VB中使用ADO对象开发SQL Server应用程序
微软在Visual Basic 6.0中成功地引入了功能强大的ADO对象作为新的数据库访问标准，它内置了SQL Server的OLE DB驱动程序。另外，为了使数据库应用程序能实现字段的绑定，Visual Basic 6.0还提供了一个封装了ADO对象的ADO Data控件，使用该控件可以开发简单的数据库访问程序，复杂的数据库访问程序的开发仍必须使用ADO对象，ADO Data控件可以起到辅助作用。
8.2.1 使用ADO对象访问SQL Server数据库
在Visual Basic 6.0中，使用ADO对象进行数据库访问有多种方式，例如： 使用Connection对象和Recordset对象配合使用，实现简单查询。
Connection对象、Recordset对象和Command对象配合使用实现复杂查询。 使用Command对象执行SQL Server的存储过程。 ADO对象的引用
在Visual Basic6.0中使用ADO对象编程之前，必须先设置对ADO类库的引用。 现以创建一个本书教学数据库teachdb的应用项目为例，其操作步骤：
（1）启动Visual Basic，创建一个新的工程，并将工程名称设置为“学生管理”，窗体名称设置为frmStudent。Caption属性设置为“学生信息”。
在
菜单中，执行
命令，打开“引用”对话框，如图8-12所示。
引用对话框 图8-12 ADO的对象的“引用”
（2）在“可用的引用”列表框中，找到“Microstoft Data Objects 2.6 Library”选项，并选中前面的复选框。
（3）单击
按钮，即可在Visual Basic 6.0中增加对ADO对象的引用。
菜单中，执行
如果要查看ADO提供的对象的属性、方法和集合等内容，可以在
命令，打开“对象浏览器”对话框，如图8-13所示。
在顶部的列表中选择ADODB，在侧窗格即可显示出ADO中的对象，而右侧窗格则显示出左侧窗格中选中的对象的属性、方法等。
各对象的方法、属性 ADO各对象 图8-13 “对象浏览器”浏览ADO对象
2.Connection对象、Recordset对象和Command对象配合使用实现数据查询
操作基本步骤如下：
（1）定义Connection对象、Recordset对象和Command对象。
（2）设置Connection对象的连接串ConnectionString属性，准备连接数据库。 ConnectionString属性的常用参数见表8-8所示。
表8-8 ConnectionString属性的常用参数 Provider参数 Server属性 DSN属性 Initial Catalog属性 User ID属性 Password属性 指定OLE DB提供者，缺省值是MSDASQL，指ODBC资源提供者 SQL Server服务器名，也可用数据源名 使用ODBC时，当前机器的ODBC数据源 设置连接的默认数据库，也可用DataBase参数 用户名 用户口令
（3）使用Connection对象的Open方法建立到数据源的物理连接。
（4）设置Command对象的ActiveConnection属性以便同打开的Connection对象进行关联。 （5）使用Command对象的CommandText属性定义要执行的SQL语句文本。
（6）使用Command对象的Execute方法执行命令并在需要的时候返回给Recordset对象。 （7）处理Recordset对象中的数据。 （8）关闭连接
【例8.1】 实现对教学数据库teachdb中课程表（course）的浏览和添加操作，并使新添加的课程信息在列表框中立即显示。如图8-14，图8-15所示。
操作步骤：
在VB中新建一个工程，在工程中建一窗口，名为frmCourse，标题为“课程信息”，加入下列控件，如图8-14所示。
图8-14 “课程信息”浏览界面示例 图8-15 “课程信息”插入界面示例
窗口中各控件名称及属性设置如表8-11所示。 表8-11 控件名称及属性 控件名称 类型 Caption属性 TxtC_no TxtC_name TxtC_score CmdAdd CmdList DataGrid1 文本框 文本框 文本框 按钮 按钮 数据网格（Datagrid） 添加 浏览 说明 左边为“课程号”标签 左边为“课程名”标签 左边为“学 分”标签 命令添加
其中DataGrid控件，需要在Visual Basic 6.0的菜单中运行
部件
8-17所示。
后，才可在工具箱中找到它的图标，如图8-16，
DataGrid控件 图8-16 添加“部件”对话框 图8-17 DataGrid控件
程序代码： '通用定义
Dim cn As New ADODB.Connection '定义Connection对象 Dim rs As New ADODB.Recordset '定义Recordset对象 Dim cmd As New ADODB.Command '定义Command对象 '窗体Load事件代码 Private Sub Form_Load()
cn.ConnectionTimeout = 30 '设置连接对象属性 cn.CursorLocation = adUseClient cn.ConnectionString = \Server;SERVER=dbserver;uid=sa;pwd=sa;DATABASE=teachdb\
cn.Open '打开连接 End Sub
'CmdAdd按钮Click事件代码 Private Sub CmdAdd_Click() Set cmd.ActiveConnection = cn
cmd.CommandText = \ALUES(?,?,?)\ '带参数的SQL语句 cmd.CreateParameter , adChar, adParamInput, 4 '参数1定义 cmd.CreateParameter , adChar, adParamInput, 10 '参数2定义 cmd.CreateParameter , adInteger, adParamInput, 4 '参数3定义 cmd.Parameters(0) = TxtC_no.Text cmd.Parameters(1) = TxtC_name.Text cmd.Parameters(2) = TxtC_score.Text cmd.Execute '运行SQL语句
cmd.CommandText = \Set rs = cmd.Execute
Set DataGrid1.DataSource = rs End Sub
'CmdList按钮Click事件代码 Private Sub CmdList_Click() Set cmd.ActiveConnection = cn
cmd.CommandText = \Set rs = cmd.Execute