第10章 SQL Server 2000管理与应用开发教程

SQL Server 2000管理与应用开发教程

SQL Server 2000管理及应用开发教程授课教师： 职务：

SQL Server 2000管理与应用开发教程

第10章课程描述

Visual Basic数据库程序设计

ADO是目前比较流行的数据 库访问技术。它是使用更 加简单灵活的对象模型， 适用于各种程序设计语言 。本章将结合Visual Basic介绍ADO数据访问技 术。

SQL Server 2000管理与应用开发教程

本章知识点 ADO数据模型 常用数据库访问控件 Visual Basic数据库应用工程管理

SQL Server 2000管理与应用开发教程

10.1 ADO数据模型 常用ADO对象的使用

ADO数据模型

SQL Server 2000管理与应用开发教程

10.1.11.连接 2.命令 3.参数 4.记录集 5.字段 6.错误 7.属性 8.集合 9.事件

ADO数据模型

SQL Server 2000管理与应用开发教程

10.1.21.Connection对象 http://mand对象 3.Recordset对象 4.Field对象

常用ADO对象的使用

在Visual Basic中，选 择菜单“工程”/“引用 ”,打开“引用”对话框 ，在引用列表中勾`选 “Microsoft Activex Data Objects 2.6 Library”(不同环境下 ADO的版本号可能不同)

SQL Server 2000管理与应用开发教程

1.Connection对象 Connection对象代表与数据源的连接。 创建Connection对象的方法如下： Dim cnn As New ADODB.Connection

C o n n e ct io n

Erro rs

C om m and

R e co rds e t

SQL Server 2000管理与应用开发教程

属性(1)ConnectionString属性 (2)ConnectionTimeout属性 (3)Mode属性 (4)State属性 (5)Open方法 (6)Close方法

SQL Server 2000管理与应用开发教程

(1)ConnectionString属性 ConnectionString是连接字符串，指定用于建立连接数据源的信息。可以使用 ODBC数据源来表示连接字符串，代码如下： Dim cnn As New ADODB.Connection cnn.ConnectionString = "DSN=mydata; “ 可以通过直接设置数据源提供者(Provider)和数据库文件的方法表示连接字符 串，代码如下： Dim cnn As New ADODB.Connection cnn.ConnectionString = "Provider=SQLOLEDB.1;Password=sa;Persist Security Info=True; User ID=sa;Initial Catalog=database_name; Data Source=127.0.0.1" 参数Provider表示数据源提供者，“SQLOLEDB.1”代表数据源类型为SQL Server ; User ID表示访问数据库的用户名； Password表示用户密码； Initial Catelog表示数据库名； Data Source表示数据库服务器名称或IP地址，127.0.0.1表示本地计算机。

SQL Server 2000管理与应用开发教程

(2)ConnectionTimeout属性 ConnectionTimeout属性指示在终止尝试和产生错误之 前执行命令需等待的时间，默认值为30s。

SQL Server 2000管理与应用开发教程

(3)Mode属性 Mode属性指定Connection对象修改数据的权 限。常量 adModeUnknown adModeRead adModeWrite adModeReadWrite adModeShareDenyRead 表明权限为只读 表明权限为只写 表明权限为读/写 防止其他用户使用读权限打开连接 说明 默认值。表明权限尚未设置或无法确定

adModeShareDenyWriteadModeShareExclusive adModeShareDenyNone

防止其他用户使用写权限打开连接防止其他用户打开连接 防止其他用户使用任何权限打开连接

SQL Server 2000管理与应用开发教程

(4)State属性State属性返回Connection对象的状态。常量 adStateClosed adStateOpen adStateConnecting

adStateExecuting adStateFetching 说明默认，指示对象是关闭的 指示对象是打开的 指示 Recordset 对象正在连接 指示 Recordset 对象正在执行命令 指示 Recordset 对象的行正在被读取

SQL Server 2000管理与应用开发教程

(5)Open方法Open方法用于打开到数据源的连接。Open方法的语法结构如下： connection.Open ConnectionString, UserID, Password, Options ConnectionString是连接字符串， UserID是访问数据库的用户名， Password是密码， Options是连接选项。 如果ConnectionString中包含了用户名和密码等信息，则相应的 参数可以省略。 如果设置了Connection对象的ConectionString属性，Open 方法就不需要设置参数了。

SQL Server 2000管理与应用开发教程

(6)Close方法 Close方法用于关闭到数据源的连接。访问数据库完成 后，为了节省资源，通常需要将数据库连接关闭。

SQL Server 2000管理与应用开发教程

【例10.1】 下面的程序演示了使用Connection对象连接到数据库的方法。 Private Sub Form_Load() '创建Connection对象cnn,关键New用于创建新对象 Dim cnn As New ADODB.Connection '设置连接字符串 cnn.ConnectionString = "Provider=SQLOLEDB.1;User ID=sa;" _ + "Password=sa;Initial Catalog=HrSystem;Data Source=127.0.0.1" '打开到数据库的连接 cnn.Open '判断连接的状态 If cnn.State = adStateOpen Then '如果连接成功，则显示OK MsgBox "打开数据库" End If '关闭连接 cnn.Close '判断连接的状态 If cnn.State = adStateClosed Then '如果连接成功，则显示OK MsgBox "关闭数据库" End If End Sub

SQL Server 2000管理与应用开发教程

http://mand对象 Command对象定义了将对数据源执行的命令。Command 对象的层次结构如下图。

C o n n e c t io n

C om m an d

P a ra m e t e rs