<!--startfragment-->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)  
willexecute 即将调用connection.execute或command.execute方法之时
private sub connection1_willexecute(source as string, cursortype as adodb.cursortypeenum, locktype as adodb.locktypeenum, options as long, adstatus as adodb.eventstatusenum, byval pcommand as adodb.command, byval precordset as adodb.recordset, byval pconnection as adodb.connection)  注:其中的adstatus参数所用到的常数的名称和含义详见adstatus所用的常数常数isolationlevel常数常数 含义 
adxactcursorstability 只允许读其他事务已提交的改变(默认值) 
adxactbrowse 允许读其他事务未提交的改变 
adxactchaos 本事务不会覆盖其他位于更高隔离程度的事务所做的改变 
adxactisolated 所有事务相互独立 
adxactreadcommitted 等同于adxactcursorstability 
adxactreaduncommitted 等同于adxactbrowse 
adxactrepeatableread 禁止读其他事务的改变 
adxactserializable 等同于adxactisolated 
adxactunspecified 不能确定提供者的事务隔离程度 mode常数常数 含义 
admodeunknown 未指定数据源的连接许可权(默认值) 
admoderead 连接是只读的 
admodereadwrite 连接是可读写的 
admodesharedenynone 不拒绝其他用户的读写访问(jet ole db provider的默认值) 
admodesharedenyread 拒绝其他用户打开到数据源的读连接 
admodesharedenywrite 拒绝其他用户打开到数据源的写连接 
admodeshareexclusive 以独占方式打开数据源 
admodewrite 连接是只写的 state常数常数 含义 
adstateclosed connection(或其他对象)是关闭的(默认值) 
adstateconnecting 正在连接数据源的状态 
adstateexecuting connection或command对象的execute方法已被调用 
adstatefetching 返回行(row)到recordset对象 
adstateopen connection(或其他对象)是打开的(活动的) execute方法中lngoption参数用到的常数command类型常数 含义 
adcmdunknown command类型未定(默认值),由数据提供者去判别command语法 
adcmdfile command是和对象类型相应的文件名称 
adcmdstoredproc command是存储过程名称 
adcmdtable command是能产生内部select * from tablename查询的表名称 
adcmdtabledirect command是能直接从表中获取行内容的表名称 
adcmdtext command是一条sql语句 adodb事件处理子过程参数adstatus所用的常数常数 含义 
adstatuscancel 操作被用户取消 
adstatuscnatdeny 操作不能拒绝其他用户对数据源的访问 
adstatuserrorsoccurred 操作导致错误并已送到errors集合中 
adstatusok 操作成功 
adstatusunwantedevent 操作过程中一个未预料到的事件被激活 ado三大对象的属性、方法、事件及常数(二)
command对象
command对象的主要目的是执行参数化的存储过程。其形式要么是临时准备(prepared),要么是持久的预编译(precompiled)过的sql语句。如果想(存储)一个或多个查询以供在同一connection上多次执行,command对象也是很有用的。当想创建recordset时,一种高效的方法是绕过command对象而采用recordset.open方法。 
属性
属性名称 数据类型和用途 
activeconnection 指针类型,指向command所关联的connection对象。对于现存的已打开连接,可使用set cmmname.activeconnection=cnnname。另外,也可以不用相关connection对象名称而使用有效的连接字符串去创建一个新的连接。默认值为null。  
commandtext 可读写string类型。为activeconnection指定一条sql语句、表名、存储过程名或提供者能接受的任意字符串。commandtype属性的值决定了commandtext属性值的格式。默认值为空字符串:"" 
commandtimeout 可读写long类型,指定中止一个command.execute调用之前必须等待的时间。这时的值优先于connection.comandtimeout中的设定值。默认值为30秒。 
commandtype 可读写long类型,指定数据提供者该如何解释commandtext属性值。commandtype等效于connection.execute方法中的可选参数lngoption。详见commandtype所用到的常数。默认值为adcmdunkown. 
name 可读写string类型,指定command的名称。 
prepared 可读写boolean类型,判断数据源是否把commandtext中的sql语句编译为prepared statement(一种临时性存储过程)。pr

解决方案 »

  1.   

    我使用ADO连接数据库,通过绑定datagrid控件来显示数据库中符合条件的内容。Option ExplicitPrivate Sub Command1_Click()
     Dim cn As New ADODB.Connection
     Dim Cmd As New ADODB.Command
     Dim rs As New ADODB.Recordset
     Dim strConnect As String
     Set cn = New ADODB.Connection
     strConnect = "Provider=SQLOLEDB.1;Persist Security Info=False;User ID=sa;Initial Catalog=database;Data Source=servername"  '指定连接字符串
     cn.ConnectionString = strConnect
     cn.Open
     With Cmd
      .ActiveConnection = cn
      .CommandType = adCmdStoredProc        '有四种可选择的类型
      .CommandText = "SP_Get_Name"           '存储过程名称
      .Parameters.Refresh
      .Parameters("@dt").Value = date()           '存储过程中参数的值(存储过程中只有一个参数)
    End With
     
     With rs
     .CursorLocation = adUseClient
     .CursorType = adOpenStatic
     .LockType = adLockReadOnly
     .Open Cmd
     End With
    Set DataGrid1.DataSource = rsEnd Sub要在DataGrid控件中显示数据CursorLocation = adUseClient和Set DataGrid1.DataSource = rs两个语句不可缺少。 
      

  2.   

    ado三大对象的属性、方法、事件及常数(三)
    recordset对象
    属性
    属性名称 数据类型和用途 
    absolutepage 可读写long类型,要么是设置或返回当前记录所处的页面序号,要么是一个positionenum常数,见absolutepage用到的常数。在获取或设置absolutepage的值之前,必须先设定pagesize的值。absolutepage是从1开始计数的。如果当前记录位于第一页时,absolutepage的返回值为1,对absolutepage设置将使当前记录指针指向指定页的第一条记录。 
    absoluteposition* 可读写的long类型(从1开始计数),设置或返回当前记录年处的位置。absoluteposition的最大取值是recordcount属性的值。 
    activecommand 可读写的string类型,recordset所关联的先前打开的command对象名称 
    activeconnection 指针类型,指向recordset所关联的先前打开的connection对象,或指向一条完整有效的connectionstring串值。
    bof* 只读boolean类型,若为true,表明记录指针已位于recordset第一条记录之前,并且没有了当前记录 
    book* 可读写variant类型,返回对特定记录的引用或使用一个book值使记录指针指向特定记录 
    cachesize* 可读写long类型,指定本地cache中所存的记录条数,最小(默认值)为1。若增加了cachesize的值,则在流动recordset以获取更多记录时,能减少与服务器的通信次数。 
    cursorlocation 可读写long类型,指定可流动游标的位置,即cursortype是位于客户端还是位于服务器端,见cursorlocation用到的常数。默认值是使用ole db数据源提供的游标。  
    cusrsortype* 可读写long类型,指定recordset游标的类型,见cursortype用到的常数,默认值是forward-only游标 
    datamember 指针类型,指向关联的dataenvironment.command对象 
    datasource 指针类型,指向关联的dataenvironment.connection对象 
    editmode* 只读long类型,返回recordset的编辑状态,见editmode用到的常数 
    eof* 只读boolean类型,若为true,表明记录指针已超出recordset的最后一条记录,并且没有了当前记录。 
    filter* 可读写variant类型,要么是一条件表达式(一条有效的sql where子句但又不出现保留字where),要么是指向特定记录的book数组,要么是一个filter常数,详见filter用到的常数。  
    locktype* 可读写long类型,指定打开recordset所使用的记录锁定方法。默认值是只读,对应于forward-only游标的只读特性。见locktype属性用到的常数。 
    marshaloptions 可读写long类型,指定客户端改动后,应返回哪个记录集合,此属性仅适合于不常见的ador.recordset对象,此对象是rds.ador.recordset对象成员之一。 
    maxrecords* 可读写long类型,指定select查询或存储过程返回的最大记录条数,默认值为0,即全部返回 
    pagecount 只读long类型,返回recordset所有的页数,必须设定了pagesize的值,pagecount的返回值才是真正有意义的。如果recordset不支持pagecount属性,则返回值为-1 
    pagesize 可读写long类型,设置或返回一个逻辑页所包含的记录条数。使用逻辑页可把大的recordset分解为多个易处理的小部分。通常的做法是把pagesize设为datagrid、msflexgrid或层次型的flexgrid控件所能显示的记录条数。pagesize和锁定jet(2k)或锁定sql server(6.5版及更早版本,2k;7.0版,8k)数据库时用到的表页面大小无关  
    persistformat 可读写long类型,设置或返回由调用save方法所创建的recordset文件的格式。当前仅有一个值adpersistadtg(默认格式:advanced data tablegram) 
    recordcount* 只读long类型,如果recordset支持近似定位或支持书签,则返回带可流动游标的recordset所含有的记录数;如果不支持,必须使用movelast方法以取得确实覆盖了所有记录的准确的recordcount数值。如果forward-only类型recordset有一条或多条记录,recordset返回-1(true),任何类型的空的recordset都将返回0(false) 
    sort* 可读写string类型,包含一条不含保留字order by的sql ordery by子句,用以指定recordset的排序方式 
    source* 可读写string类型,可以是sql语句、表名、存储过程名或相关command对象名。如果提供了command对象名,则source将返回command.commandtext的值。利用open方法的参数lngoptions可以指定提供给source值的类型  
    state 可读写long类型,为对象状态常数之一。见state常数 
    status 只读long类型,表明对recordset进行批处理或其他多记录(bulk)操作后的状态。见status属性用到的常数 
    注意:上表所列属性是adodb.recordset对象的标准属性,即那些被关系数据库的大多数通用ole db数据提供者所支持的属性。带星号的属性表示它与dao.recordset或rdoresultset对象的相应属性完全一样或很接近。 
    方法
    方法 用途 
    addnew* 向可更新的recordset添加一条新记录。调用语法为rstname.addnew[{varfield|avarfields},{varvalue|avarvaluese}],其中varfield是单个字段名,avarfields是字段名数组。varvalue是单个字段值,avarvalue是由avarfields指定字段的值所组成的数组。调用update方法则把新记录加到数据库的表中。如果向主关键字不是第一个字段的recordset中添加记录,则必须在addnew方法中指定主关键字的名称和值 
    cancel 取消异步查询的执行,中止存储过程或复合sql语句创建多个recordset,调用语法为rstname.cancel 
    cancelbatch* 取消lockedit值为batchoptimistic的recordset的即将生效的批量更新操作,调用语法为:rstname.cancelbatch [lngaffectrecords],可选参数lngaffectrecords的取值见lngaffectrecords用到的常数 
    clone 复制一个带有独立记录指针的recordset对象,调用语法为:set rstdupe=rstname.clone() 
    close 关闭recordset对象,以后可以重新设recordset的属性并使用open方法来再度访问recordset 。调用语法为:rstname.close 
    delete* 如果recordset的lockedit属性值未设为adlockbatchoptimistic,立刻从recordset和相应表中删除当前记录  
    find 寻找满足指定条件的记录。调用语法为:rstname.find strcriteria [,lngskiprecords, lngsearchdirection [,lngstart]],其中strcriteria是不含where关键字的sql where子句,可选参数lngskiprecords是应用find前所跳过的记录数目,lngdirection指定查找方向(adsearchforward,和adsearchbackward,其中adsearchforward是默认值),可选参数lngstart指定了从哪儿开始查找,其值要么是一个book值,要么是book常数,见varstart参数用到的book常数。  
    getrows 返回一个二维variant数组(行、列),调用语法为avarname=rstname.getrows(lngrows [,varstart[,{strfieldname|lngfieldindex|avarfieldnames|avarfieldindexes}]],其中lngrows是返回记录行数,varstart指定从哪儿开始查找,其值要么是一个book值,要么是book常数,见varstart参数用到的book常数。第三个参数可以是单个列(字段)的名称或索引,也可以是多个列名称或索引组成的variant数组。如果不指定第三个参数,getrows返回recordset中所有列。  
    getstring 默认情况下,返回指定数目记录的string串值,记录间由返回代码分隔。记录内由tab分隔。调用语法为: strclip=rstname.getstring(lngrows,[, strcloumndelimiter[,strrowdelimiter,[strnullexpr]]])。其中lngrows为返回记录行数,strcolumndelimiter为可选的列分隔符(vbtab是默认值),strrowdelimiter是可选的行分隔符(vbcr是默认值),strnullexpr是可选参数,用于碰到null值时的替代值(默认值是空字符串)。getstring的主要用途是通过把控件的clip属性设为strclip来处理msflexgrid或mshflexgrid控件 
    move* 从当前记录移动记录指针。调用语法为:rstname.move lngnumrecords [, varstart],其中lngnumrecords是要跳过的记录数,可选选参数varstart指定从哪开始移动。其值要么是一个book值,要么是book常数,见varstart参数用到的book常数。 
    movefirst* 移动记录指针到第一条记录,调用语法为:rstname.movefirst 
    movelast* 移动记录指针到最后一条记录,调用语法为:rstname.movelast 
    movenext 移动记录指针到下一条记录,调用语法为:rstname.movenext。它是能用于forward-only recordset的唯一move方法 
    moveprevious* 移动记录指针到前一条记录,调用语法为:rstname.moveprevious 
    nextrecordset 返回另外的recordset,它通常由能产生多个recordset的复合sql语句(如select * from orders;select * from customers)或存储过程来创建。调用语法为next=rstname.nextrecordset [(lngrecordsaffected)],其中可选参数lngrecordsaffected指定返回到rstnext中去的记录数目。如果已不存在recordset,rstnext被设为nothing  
    open 在一个活动command或connection对象上打开一个recordset,调用语法为:rstname.open [varsource [, varactiveconnection [, lngcursortype [, lnglocktype [, lngoptions]]]]]。这些参数都是可选的, 
    requery 重新从表中获取recordset的内容,等效于close后再open。它是一个资源集中型操作。语法为:rstname.requery 
    resync* 重新从表中获取部分recordset内容。调用语法为rstname.resync [lngaffectrecords],其中lngaffectrecords的取值见lngaffectrecords用到的常数。如果把该参数设为adaffectcurrent或adaffectgroup,则比adaffectall(默认值)所耗的资源要少。  
    save 创建包含recordset永久性拷贝的文件。调用语法为rstname.save strfilename。其中strfilename为路径和文件名。通常用.rst作为文件的扩展名。 
    supports 如果数据提供者支持指定的游标相关的方法,则返回true,否则返回为false。调用语法为supported=rstname.supports (lngcursoroptions).关于lngcursoroptions,见supports方法用到的常数。 
    update* 使对recordset的修改对底层数据源中的表生效。对于批量操作,update方法只使修改对本地(cached)recordset生效。调用语法为rstname.update 
    upd