Cancel Method Example (VBScript)
Important
Beginning with Windows 8 and Windows Server 2012, RDS server components are no longer included in the Windows operating system (see Windows 8 and Windows Server 2012 Compatibility Cookbook for more detail). RDS client components will be removed in a future version of Windows. Avoid using this feature in new development work, and plan to modify applications that currently use this feature. Applications that use RDS should migrate to WCF Data Service.
The following example shows how to read the Cancel method at run time. Cut and paste the following code to Notepad or another text editor and save it as CancelVBS.asp. You can view the result in any client browser.
<!-- 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 -->