NextDirectoryEntry()

Syntaxe

Resultat = NextDirectoryEntry(#Repertoire)

Cette fonction doit être appelée à la suite de ExamineDirectory(). Elle examine à la suite chaque entrée de la liste du répertoire.

Arguments

#Repertoire

Le dossier à examiner avec ExamineDirectory()

Valeur de retour

Renvoie une valeur non nulle si une nouvelle entrée a été lue ou zéro s'il n'y a pas d'entrée supplémentaire.

Remarques

Le type, le nom, la taille, la date et les attributs du fichier ou sous-répertoire correspondant à l'entrée peuvent être obtenus grâce aux fonctions DirectoryEntryType(), DirectoryEntryName(), DirectoryEntrySize(), DirectoryEntryDate() et DirectoryEntryAttributes().

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
        Attributs = DirectoryEntryAttributes(0)
        Debug Type$ + DirectoryEntryName(0) + Taille$
      EndIf
    Wend
    FinishDirectory(0)
  EndIf

Voir aussi

ExamineDirectory(), DirectoryEntryType(), DirectoryEntryName(), DirectoryEntrySize(), DirectoryEntryAttributes(), DirectoryEntryDate()

OS Supportés

Tous