State
状態取得
文法
Streamオブジェクト.State
機能説明
ストリームの状態を取得
ストリーム開閉状況定数
| 定数 | 値 | 説明 |
|---|
| adStateClosed | 0 | 閉じている(デフォルト) |
| adStateOpen | 1 | 開いている |
| adStateConnecting | 2 | 接続中 |
| adStateExecuting | 4 | コマンド実行中 |
| adStateFetching | 8 | 行取得中 |
使用例
<![CDATA[
<%
Dim objSt
Set objSt = Server.CreateObject("ADODB.Stream")
objSt.Open
objSt.LoadFromFile "D:\test\sample.html"
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へ