Cancel
メソッド実行のキャンセル
文法
Streamオブジェクト.Cancel
機能説明
非同期実行のOpenメソッドをキャンセル
使用例
<![CDATA[
<%
Dim objSt
Set objSt = Server.CreateObject("ADODB.Stream")
objSt.Open
objSt.LoadFromFile "D:\test\sample.html"
objSt.Cancel
Select Case objSt.State
Case adStateClosed
Response.Write "状況 : 閉じている<br>" & vbCrLf
Case adStateOpen
Response.Write "状況 : 開いている<br>" & vbCrLf
Case adStateConnecting
Response.Write "状況 : 接続中<br>" & vbCrLf
Case adStateExecuting
Response.Write "状況 : コマンド実行中<br>" & vbCrLf
Case adStateFetching
Response.Write "状況 : 行取得中<br>" & vbCrLf
Case Else
Response.Write "状況 : 不明<br>" & vbCrLf
End Select
'オブジェクトを閉じる
objSt.Close
Set objSt = Nothing
%>
]]>
Topへ