Valide sur les plates-formes NetWare, Symbian OS, UNIX, Windows et Windows CE
La fonction GetFileSize donne la taille du fichier en octets.
Format de la fonction :
GetFileSize(filename as String) as Integer
Identifie le chemin du fichier.
La valeur renvoyée correspond à la quantité en octets.
Exemple :
Cet exemple indique la taille et la date de création du fichier AUTOEXEC.BAT.
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.
|
|