FileSize()
Syntaxe
Resultat.q = FileSize(NomFichier$)Description
Renvoie la taille d'un fichier.
Arguments
NomFichier$ Le nom du fichier.
Valeur de retour
Renvoie la taille du fichier en octets ou l'une des valeurs suivantes:-1: Fichier inexistant. -2: Le fichier est en fait un répertoire.
Exemple
Procedure.s TailleFichier(NomFichier$) Taille = FileSize(NomFichier$) Select Taille Case -2 Reponse$ = "C'est un répertoire" Case -1 Reponse$ = "Le fichier n'existe pas" Default Reponse$ = "La taille du fichier est de " + Str(Taille) + " Octets." EndSelect ProcedureReturn Reponse$ EndProcedure Debug TailleFichier(#PB_Compiler_Home) Debug TailleFichier(#PB_Compiler_Home + "Compilers\FichierInconnu.exe") Debug TailleFichier(#PB_Compiler_Home + "Compilers\PureBasic.exe")
Voir aussi
DirectoryEntrySize()
OS Supportés
Tous