GetExtensionPart()
Syntaxe
Resultat$ = GetExtensionPart(CheminComplet$)Description
Extrait l'extension d'un fichier d'après son chemin complet.
Arguments
CheminComplet$ Le chemin d'accès complet au fichier.
Valeur de retour
Renvoie l'extension du fichier.
Par exemple, si le chemin d'accès complet est "C:\PureBasic\PB.exe", le résultat sera "exe".
Remarques
Pour récupérer le nom du fichier ou son chemin, voir les fonctions GetFilePart() et GetPathPart().
Si le chemin ne contient pas de nom de fichier alors le résultat peut-être aléatoire. Par exemple GetExtensionPart(".htaccess")" ou GetExtensionPart(".access.") ne sont pas valides.
Exemple
Repertoire$ = GetHomeDirectory() ; Liste tous les fichiers et les dossiers du répertoire racine de l'utilisateur qui est actuellement logué (Home)
If ExamineDirectory(0, Repertoire$, "*.*")
While NextDirectoryEntry(0)
If DirectoryEntryType(0) = #PB_DirectoryEntry_File
Type$ = " [Fichier] "
Taille$ = " (Taille : " + DirectoryEntrySize(0) + ")"
Else
Type$ = " [Dossier] "
Taille$ = "" ; Un Dossier n'a pas de taille
EndIf
Debug Type$ + DirectoryEntryName(0) + Taille$
Debug "Extension : " + GetExtensionPart(DirectoryEntryName(0))
Debug ""
Wend
FinishDirectory(0)
EndIf
Voir aussi
GetFilePart(), GetPathPart()
OS Supportés
Tous