Cancel-Methode (Beispiel) (VBScript)
Wichtig
Ab Windows 8 und Windows Server 2012 sind RDS-Serverkomponenten nicht mehr im Windows-Betriebssystem enthalten (weitere Details finden Sie unter Windows 8 und Windows Server 2012 Compatibility Cookbook). RDS-Clientkomponenten werden in einer zukünftigen Version von Windows entfernt. Vermeiden Sie die Verwendung dieses Features in neuer Entwicklungsarbeit, und planen Sie, Anwendungen zu ändern, die derzeit dieses Feature verwenden. Anwendungen, die RDS verwenden, sollten zu WCF Data Servicemigrieren.
Das folgende Beispiel zeigt, wie Sie die Cancel-Methode zur Laufzeit lesen. Schneiden Sie den folgenden Code aus, und fügen Sie ihn in Editor oder einem anderen Texteditor ein, und speichern Sie ihn als CancelVBS.asp. Sie können das Ergebnis in einem beliebigen Clientbrowser anzeigen.
<!-- 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 -->