[英]Copy and Rename File VBScript
我需要將名稱基於日期的文件移動到另一個文件夾。
文件結構為:
來源: \\\\network_location\\folder\\Filename_09-11-2012.txt
目的地: C:\\Dump\\Filename.txt
源文件總是滯后 1 天。 我希望在復制文件時重命名文件。
我嘗試使用的代碼是:
Sub Copy_And_Rename()
Name "\\network_location\folder\Filename_"+Month(Now())+"-"+Day(Now()-1)+"-"+Year(Now())+".txt" As "C:\Dump\Filename.txt"
End Sub
您可以像這樣使用FileSystemObject
復制和重命名文件:
Set objFSO = CreateObject("Scripting.FileSystemObject")
' First parameter: original location\file
' Second parameter: new location\file
objFSO.CopyFile "C:\Test\folder1\name1.txt", "C:\Test\folder2\name2.txt"
復制和重命名文件的代碼
sourceFilePath = "C:\filePath\source.xlsx"
destinationFilePath = "C:\filePath\destination.xlsx"
Set objFSO = CreateObject("Scripting.FileSystemObject")
objFSO.CopyFile sourceFilePath, destinationFilePath
聲明:本站的技術帖子網頁,遵循CC BY-SA 4.0協議,如果您需要轉載,請注明本站網址或者原文地址。任何問題請咨詢:yoyou2525@163.com.