ある場所から別の場所に1つ以上のファイルを移動します。
構文
object.MoveFile ( source, destination )
引数:
FileSystemObjectの名前です。備考
ワイルドカード文字は、ソース引数の最後のパス・コンポーネントでのみ使用できます。間違ったパスを渡した場合は、ソース・ファイルまたは宛先ディレクトリが存在しないというエラーがスローされます。
次の例では、MoveFileメソッドの使用方法を示します:
例1:
Function MoveSingleFile(source, destination)
Dim fso
Set fso = CreateObject("Scripting.FileSystemObject")
fso.MoveFile source, destination
End Function
' Usage
MoveSingleFile "C:\Path\To\Source\File.txt", "C:\Path\To\Destination\File.txt"
例2:
注:
ソース・パスでワイルドカードを使用した場合、宛先は既存のディレクトリである必要があります。ディレクトリが存在しない場合は、エラーがスローされます
Function MoveMultipleFiles(source, destination)
Dim fso
Set fso = CreateObject("Scripting.FileSystemObject")
fso.MoveFile source, destination
End Function
' Usage
MoveMultipleFiles "C:\Path\To\Source\*.txt", "C:\Path\To\Destination\" 'Here Destination Directory must exists