管理信息系统原理及开发 教学课件 作者 马秀麟 王燕 13.pptVIP

第八章 Visual Basic的数据库访问 一、VB内置的数据库管理对象 为了能够方便地操作数据库，VB提供了一系列的内置的数据库管理类。其中最重要的类是ADODB.Connection类和ADODB.RecordSet类。 1、ADODB.Connection类 ADODB.Connection是数据库连接类，所有对数据库的连接操作都是在这个类的基础上派生出来的。这个类有两个非常重要的属性： 一、VB内置的数据库管理对象 (1)ConnectionString属性 ConnectionString属性的值是一个字符串，用于描述数据库连接信息。例如：“DSN=数据源名称；uid=用户名；pwd＝密码”就是用的较多的方式。表示以指定的用户名和密码访问数据源对应的数据库。 (2)Open方法 Open的含义是打开数据库连接。当数据库连接被打开后，就可以通过这个数据库连接访问数据库中的内容了。 一、VB内置的数据库管理对象 (3)示例 假设要使用VB访问SQL Server 2000的数据库ycxxgl，已知此数据库的用户名是yyinfodl,密码是12345。在此数据库中有一张数据表“员工表”，结构为：职工号，姓名，性别，生日，权限，密码等。 一、VB内置的数据库管理对象 连接此数据库的常用方法是： ①利用“控制面板/管理工具”中的“ODBC数据源”，设置ycxxgl为系统数据源，数据源名称为“lswgl”。 ②使用以下代码连接数据库 DIM conn AS ADODB.Connection????? ‘定义一个数据库连接变量 Set conn =new ADODB.Connection?? ?? 创建一个数据库连接对象 Conn. ConnectionString=”DSN=lswgl; uid=yyinfodl;pwd=12345” ??Conn.open????????????????????????? 打开这个对象 一、VB内置的数据库管理对象 或者： DIM conn AS ADODB.Connection?? ???????? 定义一个数据库连接变量 Set conn =new ADODB.Connection????? ??? 创建一个数据库连接对象 Conn.open ” DSN=lswgl;uid=yyinfodl;pwd=12345”? 带参数打开这个数据库连接对象 一、VB内置的数据库管理对象 2、RecordSet类 RecordSet类是一个记录集类，可以看作是一个处于内存中的二位表格。 对于游标类型，常用的方式是0和3，当游标方式为3时，可以设置游标的工作位置是在“客户端”还是在“服务器端”。 对于游标类型，锁定方式常用1和3。当锁定方式为3时，表示可以通过记录集更新记录。 一、VB内置的数据库管理对象 一、VB内置的数据库管理对象 (2)记录集的主要属性和方法 一、VB内置的数据库管理对象 (3)记录集的应用示例 二、数据表格DataGrid DataGrid是VB为了快速进行数据表处理而专门设计的一个类，是一个显示在窗体中的二维表格。这个表格中的数据可以由带有客户端游标的记录集填充，也可以在创建DataGrid时直接通过属性DataSource设定。 二、数据表格DataGrid 表5-9 ?数据表格的属性和主要方法 三、基于代码的数据库操作 1、案例要求 假设要使用VB访问SQL Server 2000的数据库ycxxgl，已知此数据库的用户名是yyinfodl，密码是12345，定义的ODBC数据源名称是lswgl。在此数据库中有一张数据表“员工表”，结构为：职工号，姓名，性别，生日，权限，密码等。 编写一个工程sjcl，运行此工程实现如图5-19所示的功能。如果单击“查询”按钮，则只在表格中列出名字为文字框内容的记录；如图5-20。单击“删除”按钮，则删除当前光标所在位置处的记录。 三、基于代码的数据库操作 三、基于代码的数据库操作 实际演示系统设计过程 Dim conn As ADODB.Connection Dim sqls As String Dim Rs As ADODB.Recordset Private Sub Form_Load() ?? Set conn = New ADODB.Connection ?? conn.Open DSN=lswgl;uid=yyinfodl;pwd=12345 ?? Set Rs = New ADODB.Recordset ?? sqls = select * from 员工表 ?? Rs.CursorLocation = adUseClient ?? Rs.Open sqls, conn, 3, 3 ?