Move
フォルダ移動
文法
Folderオブジェクト.Move Path
パラメータ
Path : 移動先のパス
機能説明
サブフォルダを含め、フォルダを移動
「〜\」まで指定した場合はサブフォルダへ移動
使用例
<%
Dim objFs, objFld, i, objFldCol
Set objFs = Server.CreateObject("Scripting.FileSystemObject")
Set objFld = objFs.GetFile("D:\test\test1")
objFld.Move "D:\test2\"
Set objFld = objFs.GetFolder("D:\test2")
Set objFldCol = objFld.SubFolder
Response.Write objFld.Path & "のフォルダを表示
"
For Each i in objFldCol
Response.Write i.Name
Next
'オブジェクトを開放
Set objFldCol = Nothing
Set objFld = Nothing
Set objFs = Nothing
%>
Topへ