異步加載是ADO的一種數據加載方法，主要由記錄集的options參數來控制！
ADO210.CHM中的格式：
recordset.OpenSource,ActiveConnection,CursorType,LockType,Options
Options
可選。Long值，指示提供者計算Source參數的方法(如果該參數稱除Command對象之外的某些內容)，或指示Recordset應該從以前保存過的文件中恢復。能夠是一個或多[被屏蔽廣告]
個CommandTypeEnum或ExecuteOptionEnum值，這些值能夠用位AND操作符組合。
ExecuteOptionEnum
指定提供者執行命令的方法。
常量值說明
adAsyncExecute0x10指示命令將異步執行。
該值不能與CommandTypeEnum的值adCmdTableDirect組合。
adAsyncFetch0x20指示在CacheSize屬性中指定的初始數量以後的剩余行將被異步檢索。
adAsyncFetchNonBlocking0x40指示檢索時主線程從不會阻塞。如果未檢索到所請求的行，現在行將自行移動到文件結尾。
如果從包含持久存儲Recordset的Stream中打開Recordset，那麼adAsyncFetchNonBlocking將不起作用;該操作將同步進行並發生阻塞。
當adCmdTableDirect選項被用於打開Recordset時，adAsynchFetchNonBlocking不起作用。
adExecuteNoRecords0x80指示命令文本是不返回行的命令或存儲過程(舉個例子，僅插入數據的命令)。如果檢索到任意行，它們將被放棄且不返回。
adExecuteNoRecords只能作為可選參數傳遞給Command或Connection的Execute方式。
adExecuteStream0x400指示命令執行的結果應當作為流返回。
adExecuteStream只能作為可選參數傳遞給Command的Execute途徑。
adExecuteRecord指示CommandText是一個命令或存儲過程，它返回應當被作為Record對象返回的單一行。
adOptionUnspecified-1指示未指定命令。
CommandTypeEnum
指定解釋命令參數的方式。
常量值說明
adCmdUnspecified-1不指定命令類型的參數。
adCmdText1按命令或存儲過程調用的文本定義計算CommandText。
adCmdTable2按表名計算CommandText，該表的列全部是由內部生成的SQL查詢返回的。
adCmdStoredProc4按存儲過程名計算CommandText。
adCmdUnknown8默認值。指示CommandText屬性中命令的類型未知。
adCmdFile256按持久存儲的Recordset的文件名計算CommandText。只與Recordset.Open或Requery一起使用。
adCmdTableDirect512按表名計算CommandText，該表的列被全部返回。只與Recordset.Open或Requery一起使用。若要使用Seek途徑，必須通過adCmdTableDirect打開Recordset。
該值不能與ExecuteOptionEnum的值adAsyncExecute組合。普通用這個參數adAsyncFetch來控制,另外需要
.Properties("InitalFetchSize")=50
另外可參考《MSCE的VB分布式應用的開發》
舉例,Vb6.0的代碼：
DimAdoRsasADODB.Recordset
setAdoRs=newADODB.Recordset
WithAdoRs
.CursorLocation=adUseClient
.Properties("InitialFetchSize")=50
.OpenmstrSQL,AdoCn,adOpenStatic,adLockOptimistic,adAsyncFetch
If.BOF=FalseOr.EOF=FalseThen
'--------------
else
Endif
EndWith
總結：諸多的網友都問大數量加載的問題，現在這種方法可較快的返回數據。平常100萬數據，前面50條只需要5~6秒就返回來!這個方法需要注意的是：
1、如果返數據量太大，而中途要取消，需要用AdoCn.Cancel來取消查詢，否則數據會繼續返回數據。
2、如果數據量太大，記錄集的釋放會有問題。如果數據量在200M~300M時，setadors=nothing不會迅速釋放高速緩存。希望有其它網友能夠提供自己的見解。
3、對大數據量時，C/S開發中提供翻頁/網格的滾動條結合的方法，對客戶來話是極為方便。有的網友提供用存儲過程來實現。本人在開發過程用分頁控件與異步加載的數據源結合，實現了不錯的數據浏覽。
開發環境：VB6.0 MSSQLServer2K WindowsADS2K通過。
