Fileオブジェクト


ファイル名の最終更新日を調べる (DateLastModified プロパティ)


'//ファイル名の最終更新日を調べる
Dim objFS, objFile
Set objFS = CreateObject("Scripting.FileSystemObject")
Set objFile = objFS.GetFile(ファイルのパス)
MsgBox "最終更新日:" & objFile.DateLastModified

戻る

ファイル名を変更する (Name プロパティ)


'//ファイル名を変更する
Dim objFS, objFile
Set objFS = CreateObject("Scripting.FileSystemObject")
Set objFile = objFS.GetFile(ファイルのパス)
objFile.Name = 新しい名前

戻る