第七讲 VB访问SQL Server2000数据库的方法一、ODBC数据源设置1、ODBC简介ODBC Open DatabaseConnectivity开放式数据库互连）是Mircosoft公司有关数据库的一个组成部分，它建立了一组规范，并提供了一组对数据库访问的标准API Application应用程序编程接口）。
这些API利用SQL来完成大部分的任务。
ODBC本身提供对SQL语言的支持，用户可以直接将SQL送给ODBC一个基于ODBC的应用程序对数据库操作不依赖于任何DBMS，不直接与DBMS打交道，所有数据库操作由ODBC驱动程序完成。
2、ODBC数据源的创建（建立ODBC数据源）前台系统Windows 2000 professional系统，后台Windows 2000 Server系统。
以Windows 2000 professional为例：（1）单击“开始”/设置/控制面板/管理工具/数据源ODBC,打开“ODBC数据源管理器”，选择“用户DSN or 系统DSN”，单击【添加】按钮，打开“创建用户数据源”对话框，选择“SQL Server”，单击【完成】按钮。
（2）打开“创建新的数据源到SQL Server”窗口：○1你想用什么名称命名数据源：在名称框中输入xn。
○2服务器：为网络中数据库服务器（默认是本地服务器Local，可选远程服务器IP）。
○3登陆ID：xn密码：xn（取决于安装SQL时所指定的密码）。
特别注意此处为确保数据库安全起见，数据库管理员可以给用户指定一个用户名及密码。
这里为简便起见使用管理员用户名及密码。
○4更改数据库为：aa（所要使用的数据库）。
二、VB访问SQL数据库VB与SQL的连接方式有多种，限与篇幅本文仅介绍以下两种：1.通过VB的数据库管理器（1）启动VB窗口，选择菜单“外接程序（Add-in）/可视化数据管理器(Visual Data Manager)/文件(File)/打开数据库(Open Database)/ODBC”。
（2）输入以下信息：DSN：pubs；UID：sa；Password：******；数据库：pubs。
单击【确定】按钮，可观察到所连接的pubs数据库中有关的表。
发送一条SQL语句，即可验证VB与SQL Server数据库pubs已连通。
2．使用ADO Data控件访问数据库。
这是使用ADO快速创建数据绑定控件和数据提供者之间的连接。
其中数据绑定控件可以是任何具有DataSource属性的控件；数据提供者可以是任何符合OLE DB规范的数据源。
ADO Data控件是ActiveX控件，在使用前必须先将其添加到工具箱中。
方法是：（1）单击“工程”—“部件”菜单选项，选中“Microsoft ADO Data Control 6.0（OLE DB）”后，按“确定”，此时ADO数据控件便出现在工具箱中。
（2）将ADO Data控件添加到窗体上，其默认的名称属性为“Adodc1”。
（3）右击ADO Data控件，选“ADODC属性”，弹出“属性页”对话框。
（4）选中“使用连接字符串”（也可以选择“ODBC数据源名称”），再单击“生成”按钮，弹出“数据链接属性”对话框。
（5）选择“提供程序”选项卡，在列表中选择“Microsoft OLE DB Provider For SQL SERVER”选项，单击“下一步”按钮。
（6）指定服务器的名称和登录信息并选择本连接要使用的数据库文件。
（7）单击“测试连接”按钮以确定连接是否正常。
若得到测试成功的消息，单击“确定”按钮以继续。
（8）在“属性页”对话框中选择“记录源”选项卡，在命令类型下拉列表中选择“2-adCmdTable”选项，在表或存储过程名称下拉列表中选择数据表“authors”。
（若选择的命令类型为“1-adCmdText”，则可在命令文本框中输入SQL查询语句select * from authors），然后单击“确定”按钮。
（9）在窗体上再添加一个数据绑定控件DataGridl，设定其DataSource为Adodc1。
运行结果：通过上述操作便实现了SQL Server数据库aa中authors表的浏览功能，得到预期的运行结果。
远程连接格式：ConnectionString="driver={SQL Server};server=211.85.184.107 ; uid=sa;pwd=; ConnectionTimeout=0;database=aa"在VB中用ADO实现数据库访问Visual Basic作为一种面向对象的可视化编程工具，具有简单易学、灵活方便和易于扩充的特点，并且支持一套出色的数据库访问技术。
Microsoft为其提供了与SQL Server通信的API函数集及工具集，因此它越来越多地用作前台应用程序的开发，与后台的Microsoft SQL Server相结合，从而提供一个高性能的客户机-服务器方案。
一、VB数据库访问技术的发展早期的Visual Basic数据访问工具是简单的ASCII文件访问工具，极少数SQL Server 的前端应用程序是数据接口VBSQL编写的。
在Visual Basic 3.0时代，许多用户强调转移包含远程数据源的ISAM（Indexed Sequential Access Method，索引顺序存取法）数据，为此Microsoft设计了Microsoft Jet Database Engine（或简称为Jet）和DAO（Data Access Object），使得Visual Basic Access开发人员很容易地同Jet接口，其操作针对记录和字段，主要用于开发单一的数据库应用程序。
随着使用者需求的不断改变，Visual Basic又包含了更快的访问远程数据和对ODBC数据源访问的优化，出现了新的数据库接口RDO（Remote Data Object），它是访问关系型ODBC数据源的最佳界面接口，其操作针对行和列。
ADO（ActiveX Data Objects）作为另一种可供选择的技术出现，正在逐渐代替其他数据访问接口。
ADO比DAO和RDO具有更好的灵活性，更易使用，实现的功能也更全面。
二、ActiveX数据对象ADOADO是一种用于开发访问OLE DB数据源应用程序的API，是Visual Basic中新的数据访问标准。
ADO 提供了更为高级的易于理解的访问机制，具有更加简单、更加灵活的操作性能。
ADO访问数据是通过OLE DB来实现的，OLE DB不仅能够以SQL Server、Oracle、Access等数据库文件为访问对象，还可对Excel 表格、文本文件、图形文件、电子邮件等各种各样的数据通过统一的接口进行存取。
ADO集中了DAO和RDO的优点，是DAO、RDO的后继产物而且不像DAO和RDO那样依赖于对象层次。
ADO对象模型定义了一个可编程的分层对象集合，主要由七个对象成员Connection、Command、Recordset、Error、Parameter、Field和Property以及四个集合对象Errors、Parameters、Fields、Properties所组成。
每个Connection、Command、Recordset和Field对象都有Properties集合。
三、ADO数据库访问技术的应用在VB中，使用ADO访问数据库主要有两种方式，一种是使用ADO Data控件，通过对控件的绑定来访问数据库中的数据，即非编程访问方式；另一种是使用ADO对象模型，通过定义对象和编写代码来实现对数据的访问，即编程访问方式。
下面以SQL Server数据库为例，说明这两种方式的使用。
首先在SQL Server 2000中建立一个aa的数据库，在aa数据库中建立xsh数据表，然后将此数据表的信息通过数据绑定控件DataGrid显示出来。
（一）使用ADO Data控件访问数据库。
这是使用ADO快速创建数据绑定控件和数据提供者之间的连接。
其中数据绑定控件可以是任何具有DataSource属性的控件；数据提供者可以是任何符合OLE DB规范的数据源。
ADO Data控件是ActiveX控件，在使用前必须先将其添加到工具箱中。
方法是：（1）单击“工程”—“部件”菜单选项，选中“Microsoft ADO Data Control 6.0（OLE DB）”后，按“确定”，此时ADO数据控件便出现在工具箱中。
（2）将ADO Data控件添加到窗体上，其默认的名称属性为“Adodc1”。
（3）右击ADO Data控件，选“ADODC属性”，弹出“属性页”对话框。
（4）选中“使用连接字符串”（也可以选择“ODBC数据源名称”），再单击“生成”按钮，弹出“数据链接属性”对话框。
（5）选择“提供程序”选项卡，在列表中选择“Microsoft OLE DB Provider For SQL SERVER”选项，单击“下一步”按钮。
（6）指定服务器的名称和登录信息并选择本连接要使用的数据库文件。
（7）单击“测试连接”按钮以确定连接是否正常。
若得到测试成功的消息，单击“确定”按钮以继续。
（8）在“属性页”对话框中选择“记录源”选项卡，在命令类型下拉列表中选择“2-adCmdTable”选项，在表或存储过程名称下拉列表中选择数据表“xsh”。
（若选择的命令类型为“1-adCmdText”，则可在命令文本框中输入SQL查询语句select * from authors），然后单击“确定”按钮。
（9）在窗体上再添加一个数据绑定控件DataGridl，设定其DataSource为Adodc1。
运行结果：通过上述操作便实现了SQL Server数据库aa中authors表的浏览功能，得到预期的运行结果。
（二）使用ADO 对象模型访问数据库。
为了能够在程序中使用ADO对象编程，在连接数据库前，需要在Visual Basic 6.0菜单“工程”—“引用”中选择Microsoft ActiveX Data Objects 2.8 Library组件。
运用ADO 对象模型的主要元素：Connection（连接）中的ConnectionString属性进行连接，ConnectionString为可读写string类型，指定一个连接字符串，告诉ADO如何连接数据库。
（1）首先创建一组ADO对象用于设置打开连接和产生结果集。
声明语句如下：Dim cn As New ADODB.ConnectionDim rs As New ADODB.Recordset（2）创建ADO对象实例，声明了对象以后，还需要创建对象实例，否则不能使用。
