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>