fsoファイルコピーの例

■■■■■■■■■■■■■■■�
■ファイルコピーの例�
■■■■■■■■■■■■■■■�
Dim objFSO,str_from,str_to

Set objFSO = CreateObject(“Scripting.FileSystemObject”)
str_from = Server.MapPath(“wkstr_from.txt”)
str_to = Server.MapPath(“wkstr_to.txt”)

objFSO.CopyFile str_from , str_to
Set objFSO = Nothing

コメントを残す

メールアドレスが公開されることはありません。