红皮书五个例子-----数据库连接

本文主要是介绍红皮书五个例子-----数据库连接，希望对大家解决编程问题提供一定的参考价值，需要的开发者们随着小编来一起学习吧！

实例一：登录窗口

1 创建数据库：利用外接连接---可视化数据管理器---新建---添加字段和索引----生成表-----保存就这样，首先自己创建一个数据库。

2 设计窗体：添加用户名和口令，同时添加确定和取消按钮

3 使用ADO对象来访问数据库：

首先在引用的Microsoft Activex data objects 2.6 library

4 使用ADO connection 的对象属性和方法其中

（1）connectionstring属性：指定连接数据源的基本信息，用ADO访问access数据源，接字符串为 Provider=Microsoft.jet.OLEDB.3.51;Data source=" & App.path7&"路径"

（2）ADO Recordset 对象用于保存从数据源获得记录集。其中activeconnection属性代表数据源的活动连接，通常将其设置为已经建立的connection对象。Eof属性是测试当前记录位置是否位于记录集的最后一个记录之后，如果当前记录位于记录集的最后一个记录之后，Eof属性将返回True，否则返回False。Fields集合包含recordset对象所有的field对象，即可使用fields来获得当前记录各个字段的值。open方法用来打开记录集，其参数为执行查询的SQL命令字符串。

（3）代码建立数据库连接

objcn.connectionstring="provider=microsoft.jet.OLEDB.3.51;" &"Data source="& App.path&"数据库的路径"

实例二：使用ADO访问数据源

技术要领

1 使用ADO更新数据源的方法

（1）将数据检索保存到recordset对象中，用Update方法进行更新，如果使用断开连接的recordset对象，则用UPDATEBATCH方法更新，对于独占方式访问的数据，更新操作很简单，如果其他用户同时也在访问数据，则必须考虑俩个或者多个同时修改数据造成的冲突和其他不一致性。

（2）用command 对象执行sql数据更新命令，这是不需要使用recordset对象或者是其他的方法将数据检索到本地计算机。

2 recordset的locktype属性用于指定记录锁的类型，有4种类型。。 recordset的临时表的位置，同时有aduseclient为客户端临时表，aduseserver服务器端临时表。

3浏览recordset中的记录需要俩个步骤。首先定位当前记录，recordset打开时候第一个记录为当前记录，然后用field对象获得当前记录的各个数据列：例如：movefirst是记录指针指向第一个记录，move n 记录指针指向第n个记录。。这时候的bof和eof的定位可以浏览recordset中德所有的记录。其中.eof=true为记录指针指向最后一个记录之后，同样的，bof属性为True表示记录指针指向第一个记录之前。假如recordset中不包含记录的时候，bof和eof都为true。

步骤

1 创建ODBC数据源

2 设计记录浏览窗体

3 建立ADO引用要使用ADO访问数据库，必须建立对Ado对象库的引用。在引用中选中ADO

4 代码：定义 connection对象用于建立数据源连接，

recordset对象用于保存从数据源检索的数据

建立数据连接 set objcn=new connection 实例化connection对象

objcn.open"DSN=实例 2DSN"

set objrs=new recordset

窗体关闭时候，释放数据库连接和ADO对象

set.OBJRs=nothing 释放记录集对象

objcn.close 释放数据库连接

set objcn=nothing 释放连接对象

实例三：使用数据绑定访问数据：数据绑定指将控件和数据源(通常为记录集)的特定字段关联，在程序运行时候使控件能自动显示数据源数据，用户对数据的修改也可自动保存。在本例中，首先用ADO data控件连接数据库获得数据源，然后将该数据源绑定到文本框来显示数据

步骤：

1 创建窗体 --在部件中添加Microsoft Ado data control 6.0 控件并添加窗口按钮

先设置通用属性--设置身份信息--设置记录源选项

2 设置文本框的绑定属性 Datasource属性---Datamember属性---DataField属性

2 编写代码

实例四：分页显示记录

1 显示分页显示记录的数据方法

（1）使用DataGrid控件这个控件会显示记录集中的全部数据，可将当前记录页中的记录复制到一个新的记录集中，在将其绑定到DataGrid 控件中便可显示当前记录页数据。

（2）使用MSFlexGrid控件，MSFlexGrid控件可在设计时候将其绑定到Data控件中，在运行的时候，则可通过设置控件的Textmatrix属性来显示数据。相关属性为Cols属性（设置和返回控件的列数）Rows（设置和返回控件的行数）textmatrix属性（设置和返回控件任意单元格的文本内容）他的部件的名称为FlexGrid Control 6

2 代码建立数据库连接

strcn="provider=Microsoft.jet.OLEDB.4.0;persist Security info=False;"& "Data source=" & App.path &"\数据库\db1.mdb"

objCN.connectionstring=strch

objcn.open

这些例子都是学生信息管理系统的基础，其中很多的代码都是学生信息管理系统中用到的。下面用一张简单的图来说明这四个例子中使用的数据库连接的方法