数据库开发入门VBADO.docx

数据库开发入门：VB+ADO 第 第 PAGE 1 页 第七章 数据库访问控件 ADO ADO 控件 Visual Basic 中可用的数据访问接口有三种：ActiveX 数据对象(ActiveX Data Objects ， ADO)、远程数据对象(RDO)和数据访问对象(DAO)。这三种接口的每一种都分别代表了数 据访问技术的不同发展阶段。最新的是ADO，它是比RDO 和 DAO 更加简单，然而更加灵活的对象模型。目前，通常使用 ADO 作为数据访问接口。 图 7-1 ADO 数据存取控件 ActiveX 数据对象拥有与其对应的可视化控件 ADO Data 控件（ADODC）。可视化的 ADODC 具有“向前”和“向后”等按钮，因此易于使用。ADO 数据控件并非 VB 的标准控件，使用之前先要将 ADODC 加入工具箱 图 7-2 添加新部件 右键单击工具箱空白处，选择“部件(O)…”命令。系统弹出“部件”窗口，从“控件” 选项卡中找到“Microsoft ADO Data Control 6.0 (OLEDB) ”，选中并单击“确定”按钮。于是，工具箱中将出现 ADO 控件图标。 图 7-3 添加 ADO 控件 使用 ADO 控件创建一个简单的前端数据库应用程序 实例 CH7-1 浏览联系人 使用 ADODC 创建浏览联系人的界面，后台数据库使用 ACCESS 2003“联系人示例数据库” Contact.mdb。 第1步： 窗体上放置一个 ADO Data 控件，命名为 ADODC1。 第2步： 在设计界面选定 ADODC1，然后按 F4 键显示“属性”窗口。 第3步： 在“属性”窗口中，单击“ConnectionString”显示属性设置对话框。 第 第 PAGE 3 页 数据库开发入门：VB+ADO 选中“使用连接字符串”，单击按钮， 选择“Microsoft Jet 4.0 OLE DB Provider”，单击，在“连接”选项卡中选择数据库文件名。如果数据库文件与当前的应用程序在同一个路径下，则可以省略路径名。 数据库开发入门：VB+ADO 第 第 PAGE 10 页 单击 ，如果数据库文件路径和格式正确，系统提示“测试连接成功。” 第4步： 在“属性”窗口中，将“CommandType”（命令类型）属性设置为“2 - AdCmdTable”第5步： 在“属性”窗口中，打开“RecordSource”（记录源）属性设置对话框，“表或存 储过程名称”选择“联系人”表 第6步： 在窗体上放置三个“文本框”控件，用来显示数据库信息。在“属性”窗口中， 将三个文本框的“数据源”属性设为 ADO Data 控件的名称 (ADODC1)。这样就可将这个文本框和 ADO Data 控件绑定在一起。三个文本框控件的“DataField” （数据字段）属性分别设置为“姓氏”、“名字”和“办公电话”。由于三个文本框分别与数据库中的字段绑定在一起，为了防止用户意外修改记录，通常将文本框的 Locked 属性设为 True。 第7步： 运行该应用程序。用户可以在 ADO Data 控件使用四个箭头按钮浏览所有记录。需要说明的是，“RecordSource”（记录源）属性也可以使用“命令文本”，即 SQL 语句。 为此，只要将以上“第 4 步”和“第 5 步”应换成如下过程即可。 第4步： 第5步： 在“属性”窗口中，将“CommandType”（命令类型）属性设置为“2 - AdCmdText”。在“属性”窗口中，打开“ RecordSource”（记录源）属性设置对话框，“命令 文本（SQL）”中填入如下 SQL 语句“select * from 联系人” 操作数据表中的记录 实例 CH7-2 添加系统用户 使用 ADODC 控件向数据库文件 mydb.mdb 中的 sysuser 表添加新记录。第1步： 界面设计如下， 第2步： ADODC 控件命名为 ADODC1，参照实例 CH7-1 中的第 3 步至第 5 步连接到数 据库 mydb.mdb 并以 sysuser 表作为数据源（使用 SQL 语句或表均可）。 第3步： 四个文本框的 Locked 属性设置为 True，然后绑定数据源，即 DataSource 属性 设为 ADODC1，DataField 属性分别设为字段名 sysuser 的 secondname、firstname、pid 和 power。 第4步： “添加新用户”按钮代码如下， Private Private Sub cmdAddUser_Click() Dim s As String Dim fOK As Boolean fOK = True 标记操作过程