Delete
フォルダ削除
文法
Folderオブジェクト.Delete [Option]
パラメータ
Option : 読み取り専用削除指定
機能説明
サブフォルダを含め、フォルダを削除
使用例
<![CDATA[
<%
Dim objFs, objFld, i, objFldCol
Set objFs = Server.CreateObject("Scripting.FileSystemObject")
Set objFld = objFs.GetFile("D:\test2")
'読取専用でも削除
objFld.Delete True
Set objFld = objFs.GetFolder("D:\")
Set objFldCol = objFld.SubFolder("D:\")
Response.Write objFld.Path & "のフォルダを表示<br>"
For Each i in objFldCol
Response.Write i.Name
Next
'オブジェクトを開放
Set objFldCol = Nothing
Set objFld = Nothing
Set objFs = Nothing
%>
]]>
Topへ