構文
Object.DateLastAccessed
DateLastAccessed・・・・指定したObjectの最終アクセス日時を取得します。
Fileオブジェクト、Folderオブジェクトへの最終アクセス日時を取得します。
DateLastAccessedプロパティのサンプルコード
Public Sub sample() '■FileSystemObjectの宣言 Dim fso As Object: Set fso = CreateObject("Scripting.FileSystemObject") '■フォルダの最終アクセス日時を取得 Debug.Print fso.GetFolder("C:\sample").DateLastAccessed '例)2022/09/18 09:00:00 '■ファイルの最終アクセス日時を取得 Debug.Print fso.GetFile("C:\sample\sample.txt").DateLastAccessed '例)2022/09/18 09:00:00 End Sub
注意点
- 作成日時はDateCreatedで取得
- 更新日時はDateLastModifiedで取得
- 最終アクセス日時はDateLastAccessedで取得(本記事)
コメント