ADO三大对象的属性、方法、事件及常数（一）

 

 

Connection对象

 

属性

 

属性名称 数据类型和用途 

Attributes 可读写Long类型，通过两个常数之和指定是否使用保留事务（retainning transactions）。常数adXactCommitRetaining表示调用CommitTrans方法时启动一个新事务；常数adXactAbortRetaning表示调用RollbackTrans方法时启动一个新事务。默认值为0，表示不使用保留事务。 

CommandTimeout 可读写Long类型，指定中止某个相关Command对象的Execute调用之前必须等待的时间。默认值为30秒。 

ConnectionString 可读写String类型，提供数据提供者或服务提供者打开到数据源的连接所需要的特定信息 

ConnectionTimeout 可读写Long类型，指定中止一个失败的Connection.Open方法调用之前必须等待的时间，默认值为15秒。 

CursorLocation 可读写Long类型，确定是使用客户端(adUseClient)游标引擎，还是使用服务器端(adUseServer)游标引擎。默认值是adUseServer。 

DefaultDatabase 可读写String类型，如果ConnectString中未指定数据库名称，就使用这里所指定的名称，对SQL Server而言，其值通常是pubs 

IsolationLevel 可读写Long类型，指定和其他并发事务交互时的行为或事务。见IsolationLevel常数 

Mode Long类型，指定对Connection的读写权限。见Mode常数 

Provider 可读写String类型，如果ConnectionString中未指定OLE DB数据或服务提供者的名称，就使用这时指定的名称。默认值是MSDASQL(Microsoft OLE DB Provider for ODBC)。 

State 可读写Long类型，指定连接是处于打开状态，还是处于关闭状态或中间状态。见State常数 

Version 只读String类型，返回ADO版本号。 

 

注意：上面所列出的大多数可读写的属性，只有当连接处于关闭状态时才是可写的。

 

只有当用户为Connection对象用BeginTrans...CommitTrans...RollbackTrans方法定义了不遗余力，事务隔离程度的指定才真正有效。如果有多个数据库用户同时执行事务，那么应用程序中必须指定如何响应运行中的其他事务。

 

方法

 

方法 用途 

BeginTrans 初始化一个事务；其后必须有CommitTrans和／或RollbackTrans相呼应 

Close 关闭连接 

CommitTrans 提交一个事务，以完成对数据源的永久改变（要求使用之前必须调用了BeginTrans方法) 

Execute 人SELECT SQL语句返回一个forward-only Recordset对象，也用来执行那些不返回Recordset语句，如INSERT、UPDATE、DELETE查询或DDL语句 

Open 用连接字符串来打开一个连接 

OpenSchema 返回一个Recordset对象以提供数据源的结构信息(metadata) 

RollbackTrans 取消一个事务，恢复对数据源做的临时性改变(要求使用之前必须调用了BeginTrans方法) 

 

注：只有Execute、Open和OpenSchema三个方法才能接受变元参数。Execute的语法为：

cnnName.Execute strCommand,[lngRowsAffected[,lngOptions]]

strCommand的值可以是SQL语句、表名、存储过程名，也可以是数据提供者所能接受的任意字符串。为了提高性能，最好为lngOptions参数指定合适的值（详见lngOptions参数用到的常数），以使提供者解释语句时不用再去判定其类型。可选参数lngRowsAffected将返回INSERT、UPDATE或DELETE查询执行以后所影响的数目。这些查询会返回一个关闭的Recordset对象。一个SELECT查询将返回lngRowsAffected值为0并且返回带有一行或多行内容的打开的forward-only Recordset。

 

事件

 

事件名称 触发时机 

BeginTransComplete BeginTrans方法执行以后。

Private Sub cnnName_BeginTransComplet(ByVal TransactionLevel As Long,ByVal pError As ADODB.Error,adStatus As ADODB.EventStatusEnum, ByVal pConnection As ADODB.Connection) 

CommitTransComplete CommitTrans方法执行以后

Private Sub Connection1_CommitTransComplete(ByVal pError As ADODB.Error, adStatus As ADODB.EventStatusEnum, ByVal pConnection As ADODB.Connection)  

ConnectComplete 成功建立到数据源的Connection之后

Private Sub Connection1_ConnectComplete(ByVal pError As ADODB.Error, adStatus As ADODB.EventStatusEnum, ByVal pConnection As ADODB.Connection)  

Disconnect Connection关闭之后

Private Sub Connection1_Disconnect(adStatus As ADODB.EventStatusEnum, ByVal pConnection As ADODB.Connection)  

ExecuteComplete 完成Connection.Execute或Command.Execute之时

Private Sub Connection1_ExecuteComplete(ByVal RecordsAffected As Long, ByVal pError As ADODB.Error, adStatus As ADODB.EventStatusEnum, ByVal pCommand As ADODB.Command, ByVal pRecordset As ADODB.Recordset, ByVal pConnection As ADODB.Connection)  

InfoMessage 一个Error对象被添加到ADODB.Connectio.Error集合之时

Private Sub Connection1_InfoMessage(ByVal pError As ADODB.Error, adStatus As ADODB.EventStatusEnum, ByVal pConnection As ADODB.Connection)  

RollbackTransComplete RollbackTrans方法执行之后

Private Sub Connection1_RollbackTransComplete(ByVal pError As ADODB.Error, adStatus As ADODB.EventStatusEnum, ByVal pConnection As ADODB.Connection)  

WillConnect 即将调用Connection.Open方法之时

Private Sub Connection1_WillConnect(ConnectionString As String, UserID As String, Password As String, Options As Long, adStatus As ADODB.EventStatusEnum, ByVal pConnection As ADODB.Connection)  

补充：软件开发 , Vb ,
上一个：ADO三大对象的属性、方法、事件及常数（二）
下一个：ADO控件和DATA控件的冲突（不能共存）的解决方法
更多图片编程知识:

VB 神童教程第二章第六节——综合示例二

VB 神童教程第二章第一节--Label 控件

怎么解决Access2007 VB编程中不支持ActiveX控件的问题

学生综合测评成绩管理

有没有Java和Vb通用的DES加密代码啊？

[求助]一个VB小程序。。。大神来看看
  
更多VB疑问解答：
vb把图片转换成 base64代码
批处理转移文 之errorlevel
vb 6.0 调用vb.net dll混合程序集错误
VB inet控件访问ftp 本机测试通过客户机inet控件使用失败。急！！
求助在Dir1控件当前目录下新建一个文件夹的代码
CreateObject创建Word Excel对象失败，提示，无法加载DLL，怎么解决？
有两个磁盘阵列,如何使用能达到最好的效果
cloudStack 如何实现 vSphere的DRS功能
和难缠客户的那些事儿
批处理转移文 之errorlevel
vb 6.0 调用vb.net dll混合程序集错误
VB inet控件访问ftp 本机测试通过客户机inet控件使用失败。急！！
求助在Dir1控件当前目录下新建一个文件夹的代码
CreateObject创建Word Excel对象失败，提示，无法加载DLL，怎么解决？
有两个磁盘阵列,如何使用能达到最好的效果