Copy
コピー
文法
Fileオブジェクト.Copy FileName[,Update]
パラメータ
FileName : パスを含むファイル名
Option : 上書き指定
上書き(デフォルト) : True/上書きしない : False
機能説明
ファイルをコピー
使用例
<![CDATA[
<%
Dim objFs, objFl, objFld, i
Set objFs = Server.CreateObject("Scripting.FileSystemObject")
Set objFl = objFs.GetFile("D:\test\test.txt")
objFl.Copy "D:\test\test1.txt"
Set objFld = objFs.GetFolder("D:\test")
Set objFlCol = objFld.Files
Response.Write objFl.Path & "のファイルを表示<br>"
For Each i in objFlCol
Response.Write i.Name
Next
'オブジェクトを開放
Set objFlCol = Nothing
Set objFld = Nothing
Set objFl = Nothing
Set objFs = Nothing
%>
]]>
Topへ