【VBScript】ファイルの更新日時を変更する

2023年2月4日VBScript

ファイルの更新日時を変更する

ファイルの更新日時を変更する例です。

先頭にあるConstの二つを変更することだけで実行できます。

'この2つのみを設定する
Const filePath = "C:\test\list1.txt"      '更新日時を変更したいファイルのフルパス
Const UpdateDate = "2022/9/27 20:34:56"   '更新したい日時

Dim objFolder
Dim objFile
Dim objShell
Dim fs
Dim folderName
Set fs = WScript.CreateObject("Scripting.FileSystemObject")
Set objShell = WScript.CreateObject("Shell.Application")
folderName = Replace(filePath , fs.GetFile(filePath).Name , "")
Set objFolder = objShell.NameSpace(folderName)
Set objFile = objFolder.ParseName(replace(filePath,folderName,""))

'ここで更新日時を変更する
objFile.ModifyDate = UpdateDate