ぷろぐらむノート

ファイルの日付を取得および変更する方法を記載します。

ファイルの日付を取得する

File クラスを使用して、ファイルの日付・時刻を取得する

Dim sFilePath As String = "c:\work\myfile.txt"		

' 作成日時を取得する
Dim dCreate As DateTime = System.IO.File.GetCreationTime(sFilePath)

' 更新日時を取得する
Dim dUpdate As DateTime = System.IO.File.GetLastWriteTime(sFilePath)

' アクセス日時を取得する
Dim dAccess As DateTime = System.IO.File.GetLastAccessTime(sFilePath)

 

FileInfo クラスを使用して、ファイルの日付・時刻を取得する

Dim sFilePath As String = "c:\work\myfile.txt"		

Dim fInfo As New System.IO.FileInfo(sFilePath)
'または
Dim fInfo As System.IO.FileInfo = My.Computer.FileSystem.GetFileInfo(sFilePath)

'作成日時を取得する
Dim dCreate As DateTime = fInfo.CreationTime

'更新日時を取得する
Dim dUpdate As DateTime = fInfo.LastWriteTime

'アクセス日時を取得する
Dim dAccess As DateTime = fInfo.LastAccessTime

 

ファイルの日付を変更する

File クラスを使用して、ファイルの日付・時刻を変更する

Dim sFilePath As String = "c:\work\myfile.txt"

' 作成日時を変更する
System.IO.File.SetCreationTime(sFilePath, DateTime.Now)

' 更新日時を変更する
System.IO.File.SetLastWriteTime(sFilePath, DateTime.Now)

' アクセス日時を変更する
System.IO.File.SetLastAccessTime(sFilePath, DateTime.Now)

 

FileInfo クラスを使用して、ファイルの日付・時刻を変更する

Dim sFilePath As String = "c:\work\myfile.txt"

Dim fInfo As New System.IO.FileInfo(sFilePath)
'または
Dim fInfo As System.IO.FileInfo = My.Computer.FileSystem.GetFileInfo(sFilePath)

' 作成日時を変更する
fInfo.CreationTime = DateTime.Now

' 更新日時を変更する
fInfo.LastWriteTime = DateTime.Now

' アクセス日時を変更する
fInfo.LastAccessTime = DateTime.Now

 

プロパティで表示される、ファイルの詳細情報（バージョン・会社名・製品名・著作権など）を取得する方法を記載します。

Dim sFilePath As String = "c:\work\myfile.txt"		

Dim hVInfo As System.Diagnostics.FileVersionInfo = _
              System.Diagnostics.FileVersionInfo.GetVersionInfo(sFilePath)