Cancel 方法範例 (VBScript)
重要
從 Windows 8 和 Windows Server 2012 開始,RDS 伺服器元件已不再包含在 Windows 作業系統中(如需詳細資訊,請參閱 Windows 8 和 Windows Server 2012 兼容性 Cookbook)。 RDS 用戶端元件將在未來的 Windows 版本中移除。 請避免在新的開發工作中使用此功能,並計劃修改目前使用此功能的應用程式。 使用 RDS 的應用程式應該移至 WCF Data Service。
下列範例示範如何在運行時間讀取 Cancel 方法。 將下列程式代碼剪下並貼到 [記事本] 或其他文本編輯器中,並將它儲存為CancelVBS.asp。 您可以在任何用戶端瀏覽器中檢視結果。
<!-- BeginCancelVBS -->
<Script Language="VBScript">
<!--
Sub cmdCancelAsync_OnClick
' Terminates currently running AsyncExecute,
' ReadyState property set to adcReadyStateLoaded,
' Recordset set to Nothing
ADC.Cancel
End Sub
Sub cmdRefreshTable_OnClick
ADC.Refresh
End Sub
-->
</Script>
<OBJECT CLASSID="clsid:BD96C556-65A3-11D0-983A-00C04FC29E33" ID="ADC">
.
<PARAM NAME="SQL" VALUE="Select FirstName, LastName from Employees">
<PARAM NAME="CONNECT" VALUE="Provider='sqloledb';Integrated Security='SSPI';Initial Catalog='Northwind'">
<PARAM NAME="Server" VALUE="https://<%=Request.ServerVariables("SERVER_NAME")%>">
.
</OBJECT>
<TABLE DATASRC=#ADC>
<TBODY>
<TR>
<TD><SPAN DATAFLD="FirstName"></SPAN></TD>
<TD><SPAN DATAFLD="LastName"></SPAN></TD>
</TR>
</TBODY>
</TABLE>
<FORM>
<INPUT type="button" value="Refresh" id=cmdRefreshTable name=cmdRefreshTable>
<INPUT type="button" value="Cancel" id=cmdCancelAsync name=cmdCancelAsync>
</FORM>
<!-- EndCancelVBS -->