ファイルの日付を取得する方法
◆概要
このページは、Visual Basic 6.0でファイルの日付を取得する方法について記載しています。
ファイルシステムオブジェクトに含まれるFile オブジェクトを使うことで、ファイルの作成日時、更新日時、アクセス日時を取得できます。
◆Sample code
Private Sub Command1_Click() Dim objFilesystem As Object Dim objFile As Object Dim strFileName As String strFileName = "C:\autoexec.bat" Set objFilesystem = CreateObject("Scripting.FileSystemObject") Set objFile = objFilesystem.GetFile(strFileName) Debug.Print "ファイルの作成日時;"; objFile.DateCreated Debug.Print "ファイルの更新日時;"; objFile.DatelastModified Debug.Print "ファイルのアクセス日付:"; objFile.DateLastAccessed 'オブジェクトを解放 Set objFilesystem = Nothing Set objFile = Nothing End Sub |
◆実行結果