Gültig für NetWare, Symbian OS, UNIX, Windows und Windows CE.
Mit der Funktion "GetFileTime" wird entweder das Erstellungsdatum einer Datei (Format 1) oder, wenn ein Zeittyp angegeben ist (Format 2), das Erstellungsdatum, das Datum des letzten Zugriffs oder das Datum der letzten Änderung zurückgegeben.
Funktionssyntax:
GetFileTime(filename as String) as DateTime
GetFileTime(filename as String, type as Integer) as DateTime
Gibt den Namen der zu untersuchenden Datei an.
Der von der Datei abzurufende Zeittyp.
Folgende Werte sind gültig:
0 Datum und Uhrzeit der Erstellung.
1 Datum und Uhrzeit des letzten Zugriffs.
2 Datum und Uhrzeit der letzten Änderung (Standard).
Die DateTime-Struktur ist folgendermaßen definiert:
Type DateTime
Year as Integer Month as Integer Day as Integer DayOfWeek as Integer Hour as Integer Minute as Integer Second as Integer
End Type
Bei erfolgreicher Ausführung gibt die Funktion das Datum und die Uhrzeit der Erstellung einer Datei (Format 1) oder den für den Typ definierten Zeittyp (Format 2) zurück. Wenn die Datei nicht existiert, wird eine DateTime-Struktur zurückgegeben, deren Elemente alle auf -1 gesetzt sind.
Beispiel:
dim size as integer
dim time as DateTime
dim out as string
size=GetFileSize("C:\AUTOEXEC.BAT")
if (size<>-1) then
out="Dateigröße: "+chr(9)+chr(9)+str(size)+" Byte"+ chr(10)
time=GetFileTime("C:\AUTOEXEC.BAT")
out=out+"Erstellungsdatum: "+chr(9)+str(time.month)+"/"+str(time.day)+"/"+str(time.year)
out=out+" "+str(time.hour)+":"+str(time.minute)+" "
MsgBox("Informationen über C:\AUTOEXEC.BAT"+chr(10)+chr(10)+out)
else
MsgBox("C:\AUTOEXEC.BAT nicht gefunden")
end if
end:
|
Copyright © 2014 CA Technologies.
Alle Rechte vorbehalten.
|
|