Rubrik: Dateisystem · Dateien - allgemein | VB-Versionen: VB2005, VB2008 | 25.05.09 |
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: | Views: 39.704 |
www.tools4vb.de | System: Win2k, WinXP, Win7, Win8, Win10, Win11 | Beispielprojekt auf CD |
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