Close
ストリームを閉じる
文法
Streamオブジェクト.Close
機能説明
ストリームを閉じる
使用例
<%
Dim objSt
Set objSt = Server.CreateObject("ADODB.Stream")
objSt.Open
objSt.LoadFromFile "D:\test\sample.html"
objSt.Close
Select Case objSt.State
Case adStateClosed
Response.Write "状況 : 閉じている
" & vbCrLf
Case adStateOpen
Response.Write "状況 : 開いている
" & vbCrLf
Case adStateConnecting
Response.Write "状況 : 接続中
" & vbCrLf
Case adStateExecuting
Response.Write "状況 : コマンド実行中
" & vbCrLf
Case adStateFetching
Response.Write "状況 : 行取得中
" & vbCrLf
Case Else
Response.Write "状況 : 不明
" & vbCrLf
End Select
'オブジェクトを閉じる
Set objSt = Nothing
%>
Topへ