Valide sur les plates-formes NetWare, Symbian OS, UNIX, Windows et Windows CE
La fonction GetFileTime renvoie la date de création d'un fichier (format 1), ou, si le type d'heure est indiqué (format 2), la date de création, la date du dernier accès ou la date de dernière modification.
Format de la fonction :
GetFileTime(filename as String) as DateTime
GetFileTime(filename as String, type as Integer) as DateTime
Indique le nom du fichier à examiner.
Type d'heure de fichier à extraire.
Les valeurs suivantes sont autorisées :
0 Date et heure de la création.
1 Date et heure du dernier accès.
2 Date et heure de la dernière modification (par défaut).
La structure DateTime est définie ainsi :
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
Une fois qu'elle a réussi, la fonction renvoie la date et l'heure de création d'un fichier (format 1) ou le type d'heure spécifié (format 2). Si le fichier n'existe pas, elle renvoie une structure DateTime avec tous les membres définis à -1.
Exemple :
dim size as integer
dim time as DateTime
dim out as string
size=GetFileSize("C:\AUTOEXEC.BAT")
if (size<>-1) then
out="Taille du fichier : "+chr(9)+chr(9)+str(size)+" octets"+ chr(10)
time=GetFileTime("C:\AUTOEXEC.BAT")
out=out+"Date de création : "+chr(9)+str(time.month)+"/"+str(time.day)+"/"+str(time.year)
out=out+" "+str(time.hour)+":"+str(time.minute)+" "
MsgBox("Informations sur C:\AUTOEXEC.BAT"+chr(10)+chr(10)+out)
else
MsgBox("C:\AUTOEXEC.BAT est introuvable")
end if
end:
|
Copyright © 2014 CA Technologies.
Tous droits réservés.
|
|