ExecuteOptions 和 FetchOptions 属性范例

以下代码演示如何在设计时设置 ExecuteOptions 和 FetchOptions 属性。如果不进行设置，ExecuteOptions 将默认为 adcExecSync。该设置表明在调用 ADC.Refresh 方法时，该方法将在当前调用的线程上执行（同步）。

<OBJECT CLASSID="clsid:BD96C556-65A3-11D0-983A-00C04FC29E33" ID="ADC1">

.

.

.

<PARAM NAME="SQL" VALUE="Select * from Sales">

<PARAM NAME="Connect" VALUE="DSN=pubs;UID=sa;PWD=;">

<PARAM NAME="Server" VALUE="http://MyWebServer">

<PARAM NAME="ExecuteOptions" VALUE="1">

<PARAM NAME="FetchOptions" VALUE="3">

.

.

</OBJECT>

以下范例演示如何以 VBScript 代码在运行时设置 ExecuteOptions 和 FetchOptions 属性。请参阅这些属性工作范例的 Refresh 方法。

<Script Language="VBScript">

<!--

Sub ExecuteHow

' 对调用的线程异步执行下一个记录集刷新。

ADC1.ExecuteOptions = 1

ADC1.FetchOptions = 3

ADC.Refresh

End Sub

-->

</Script>