Datum und Uhrzeit einer Datei ermitteln und ändern Diese Codeschnipsel zeigt, wie sich alle Datumsangaben einer Datei ermitteln und auch ändern lassen.
Autor:   Dieter Otter	Bewertung:     [ Jetzt bewerten ]	Views:  41.353
https://www.tools4vb.com	System:  Win2k, WinXP, Win7, Win8, Win10, Win11	Beispielprojekt auf CD

Geben Sie hier Ihre persönliche Bewertung ab! Anzahl Bewertungen bisher: 3 Bewertung insgesamt: nützlich Durchschnittliche Bewertung: 3.3 von 5 Sternen

sehr gut     gut     nützlich     mittelmäßig     mangelhaft

Mit Hilfe des FileInfo-Objekts lassen sich schnell alle Datums- und Uhrzeitangaben einer Datei ermitteln und auch ändern, wie nachfolgender Codeschnipsel zeigt:

Dim sFile As String = "D:\test.txt"
 
' FileInfo-Objekt erstellen
With New System.IO.FileInfo(sFile)
  ' Datums- und Zeitangaben auslesen 
  Debug.Print("Erstellungsdatum: " & .CreationTime)
  Debug.Print("Letzter Zugriff: " & .LastAccessTime)
  Debug.Print("Letzte Änderung: " & .LastWriteTime)
 
  ' Erstellungsdatum ändern
  .CreationTime = New Date(2009, 5, 15, 13, 12, 11)
 
  ' Datumsangabe "Letzter Zugriff" ändern
  .LastAccessTime = New Date(2009, 5, 16, 13, 12, 11)
 
  ' Datum "Letzte Änderung" ändern
  .LastWriteTime = New Date(2009, 5, 17, 13, 12, 11)
End With