State

状態取得


文法
Recordオブジェクト.State


機能説明
Recordオブジェクトの状態設定


オブジェクト状態
定数説明
adStateClosed 0 閉じている(デフォルト)
adStateOpen 1 開いている
adStateConnecting 2 接続中
adStateExecuting 4 コマンド実行中
adStateFetching 8 行の取得

使用例
<% Dim objRd Set objRd = Server.CreateObject("ADODB.Record") objRd.Open "http://localehost/" '表示 Select Case objRd.State Case adStateClosed Response.Write "オブジェクト状態 : 閉じている" & "<br>" Case adStateOpen Response.Write "オブジェクト状態 : 開いている" & "<br>" Case adStateConnecting Response.Write "オブジェクト状態 : 接続中" & "<br>" Case adStateExecuting Response.Write "オブジェクト状態 : コマンド実行中" & "<br>" Case adStateFetching Response.Write "オブジェクト状態 : 行の取得" & "<br>" End Select 'オブジェクトを閉じる objRd.Close '表示 Select Case objRd.State Case adStateClosed Response.Write "オブジェクト状態 : 閉じている" & "<br>" Case adStateOpen Response.Write "オブジェクト状態 : 開いている" & "<br>" Case adStateConnecting Response.Write "オブジェクト状態 : 接続中" & "<br>" Case adStateExecuting Response.Write "オブジェクト状態 : コマンド実行中" & "<br>" Case adStateFetching Response.Write "オブジェクト状態 : 行の取得" & "<br>" End Select Set objRd = Nothing %>
Topへ