上一篇：做一个Windows窗体版的DOS分析器 >>

vb精彩教程:数据异步加载

异步加载是ado的一种数据加载方式，主要由记录集的options参数来控制！
　　
　　ado210.chm中的格式：
　　recordset.open source, activeconnection, cursortype, locktype, options
　　
　　options
　　可选。long 值，指示提供者计算 source 参数的方式（如果该参数表示除 command 对象之外的某些内容），或者指示 recordset 应该从以前保存过的文件中恢复。可以是一个或多个 commandtypeenum 或 executeoptionenum 值，这些值可以用位 and 操作符组合。
　　
　　executeoptionenum
　　指定提供者执行命令的方式。
　　
　　常量值说明
　　adasyncexecute 0x10 指示命令将异步执行。
　　该值不能与 commandtypeenum 的值 adcmdtabledirect 组合。
　　
　　adasyncfetch 0x20 指示在 cachesize 属性中指定的初始数量以后的剩余行将被异步检索。
　　adasyncfetchnonblocking 0x40 指示检索时主线程从不会阻塞。如果未检索到所请求的行，当前行将自行移动到文件结尾。
　　如果从包含持久存储 recordset 的 stream 中打开 recordset，那么 adasyncfetchnonblocking 将不起作用；该操作将同步进行并发生阻塞。
　　
　　当 adcmdtabledirect 选项被用于打开 recordset 时，adasynchfetchnonblocking 不起作用。

　　adexecutenorecords 0x80 指示命令文本是不返回行的命令或存储过程（例如，仅插入数据的命令）。如果检索到任何行，它们将被放弃且不返回。
　　　　adexecutenorecords 只能作为可选参数传递给 command 或 connection 的 execute 方法。
　　
　　adexecutestream 0x400 指示命令执行的结果应当作为流返回。
　　adexecutestream 只能作为可选参数传递给 command 的 execute 方法。
　　
　　adexecuterecord 指示 commandtext 是一个命令或存储过程，它返回应当被作为 record 对象返回的单一行。
　　adoptionunspecified -1 指示未指定命令。
　　
　　
　　commandtypeenum
　　指定解释命令参数的方法。
　　
　　常量值说明
　　adcmdunspecified -1 不指定命令类型的参数。
　　adcmdtext 1 按命令或存储过程调用的文本定义计算 commandtext。
　　adcmdtable 2 按表名计算 commandtext，该表的列全部是由内部生成的 sql 查询返回的。
　　adcmdstoredproc 4 按存储过程名计算 commandtext

adcmdunknown 8 默认值。指示 commandtext 属性中命令的类型未知。
　　adcmdfile 256 按持久存储的 recordset 的文件名计算 commandtext。只与 recordset.open 或 requery 一起使用。
　　adcmdtabledirect 512 按表名计算 commandtext，该表的列被全部返回。只与 recordset.open 或 requery 一起使用。若要使用 seek 方法，必须通过 adcmdtabledirect 打开 recordset。
　　该值不能与 executeoptionenum 的值 adasyncexecute 组合。
　　
　　一般用这个参数adasyncfetch来控制,另外需要
　　.properties("inital fetch size")=50
　　另外可以参考《msce的vb分布式应用的开发》
　　
　　举例,vb6.0的代码：
　　
　　dim adors as adodb.recordset
　　
　　set adors =new adodb.recordset
　　with adors
　　 .cursorlocation = aduseclient
　　 .properties("initial fetch size") = 50
　　 .open mstrsql, adocn, adopenstatic, adlockoptimistic, adasyncfetch
　　 if .bof = false or .eof = false then
　　 --------------
　　 else
　　 end if
　　end with
　　
　　总结：很多的网友都问大数量加载的问题，现在这种方式可以较快的返回数据。一般100万数据，前面50条只需要5~6秒就返回来！这个方式需要注意的是：
　　　　
　　1。如果返数据量太大，而中途要取消，需要用adocn.cancel来取消查询，否则数据会继续返回数据。
　　
　　2。如果数据量太大，记录集的释放会有问题。如果数据量在200m~300m时，set adors=nothing 不会快速释放高速缓存。希望有其它网友能够提供自己的见解。

　　3。对大数据量时，c/s开发中提供翻页/网格的滚动条结合的方式，对用户来话是极为方便。有的网友提供用存储过程来实现。本人在开发过程用分页控件与异步加载的数据源结合，实现了很好的数据浏览。
　　
　　开发环境：vb6.0+ms sql server 2k +windows ads 2k通过

（）

返回顶部

下一篇：使用webservice解决多系统登陆问题 >>