將一或多個檔案從一個位置移至另一個位置。
語法
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