VBScriptでファイル操作についてのサンプルです。
Option Explicit Dim objFileSys Dim strMoveFrom Dim strMoveTo '①ファイルシステムオブジェクトを作成 Set objFileSys = CreateObject("Scripting.FileSystemObject") '============================================================== '= ファイルの移動 '============================================================== '②移動元と移動先のファイル名を変数に設定 strMoveFrom = "c:\vbs\test\aaaaa" strMoveTo = "c:\vbs\tmp\aaaaa" '③ファイルの移動を行います objFileSys.MoveFile strMoveFrom,strMoveTo '============================================================== '= フォルダの移動 '============================================================== '④移動元と移動先のフォルダ名を変数に設定 'strMoveFrom = "c:\happy\temp\data" 'strMoveTo = "c:\happy\send\data" '⑤フォルダの移動を行います 'objFileSys.MoveFolder strMoveFrom,strMoveTo '============================================================== '= ファイル名の変更(同じフォルダ内での移動) '============================================================== '⑥移動元と移動先のファイル名を変数に設定 ' 移動先と移動元のフォルダを同じにし、ファイル名だけ別にすると ' ファイル名の変更をしたことになる 'strMoveFrom = "c:\happy\SendFile.txt" 'strMoveTo = "c:\happy\SendFile2.txt" '⑦ファイルの移動を行います 'objFileSys.MoveFile strMoveFrom,strMoveTo '============================================================== '= フォルダ名の変更(同じフォルダ内での移動) '============================================================== '⑧移動元と移動先のフォルダ名を変数に設定 ' 移動先と移動元のフォルダを同じにし、移動するフォルダ名だけ別にすると ' フォルダ名の変更をしたことになる 'strMoveFrom = "c:\happy\data" 'strMoveTo = "c:\happy\data2" '⑨フォルダの移動を行います 'objFileSys.MoveFolder strMoveFrom,strMoveTo '⑩オブジェクトの破棄 set objFileSys = Nothing