Close
オブジェクトを閉じる
文法
Recordオブジェクト.Close
機能説明
Recordオブジェクトを閉じる
使用例
<![CDATA[
<%
Dim objRd
Set objRd = Server.CreateObject("ADODB.Record")
objRd.Open "http://localehost/"
objRec.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
'オブジェクトを閉じる
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へ