CopyFile
ファイルコピー
文法
FileSystemObjectオブジェクト.CopyFile From, To [,Option]
パラメータ
From : コピー元ファイル名
To : コピー先パス
Option : 上書き指定
上書き(デフォルト) : True/上書きしない : False
機能説明
ファイルをコピー
ワイルドカード使用可
コピー先パスは「C:\Inetpub\wwwroot\」のように〜\までを指定
ファイル名まで指定するとファイル名を変更してコピーします。
使用例
<%
Dim objFs, objFld, objFlCol
Set objFs = Server.CreateObject("Scripting.FileSystemObject")
objFs.CopyFile "D:\test\*", "D:\test2\"
Set objFld = objFs.GetFolder("D:\test")
Set objFlCol = objFld.Files
Response.Write "コピー元
" & vbCrlf
For Each i in objFlCol
Response.Write i.Name & "
" & vbCrlf
Next
Set objFld = objFs.GetFolder("D:\test1")
Set objFlCol = objFld.Files
Response.Write "コピー先
" & vbCrlf
For Each i in objFlCol
Response.Write i.Name & "
" & vbCrlf
Next
'オブジェクトを開放
Set objFld = Nothing
Set objFlCol = Nothing
Set objFs = Nothing
%>
Topへ