ExamineDirectory()

Syntax

Ergebnis = ExamineDirectory(#Verzeichnis, VerzeichnisName$, Pattern$)

Beginnt die Prüfung des angegebenen '#Verzeichnis' zur weiteren Bearbeitung mittels der Befehle NextDirectoryEntry(), DirectoryEntryName() und DirectoryEntryType().

Wenn #PB_Any als '#Verzeichnis' Parameter verwendet wird, dann wird die neue Verzeichnis-Nummer als 'Ergebnis' zurückgegeben. Ist 'Ergebnis' gleich 0, kann das Verzeichnis nicht untersucht werden.

Sobald die Untersuchung des Verzeichnisses abgeschlossen ist, muss FinishDirectory() aufgerufen werden, um die für das Auflisten benötigten Ressourcen freizugeben.

Der 'Pattern$' gibt an, welche Dateien aufgelistet werden sollen.
Zum Beispiel: "*.*" oder "" werden alle Dateien (und Unterverzeichnisse) im Verzeichnis auflisten. Ein 'Pattern$' wie "*.exe" wird nur .exe (ausführbare) Dateien auflisten (und ggf. auf ".exe" endende Unterverzeichnisse).

Hinweis: Wenn das Programm endet, werden alle verbliebenen ExamineDirectory() automatisch freigegeben.

Beispiel:

  Directory$ = "C:\"   ; Listet alle Einträge auf C:\ auf (ohne die Inhalte aus Unterverzeichnissen)
  If ExamineDirectory(0, Directory$, "*.*")  
    While NextDirectoryEntry(0)
      If DirectoryEntryType(0) = #PB_DirectoryEntry_File
        Type$ = " [File] "
      Else
        Type$ = " [Sub-Dir] "
      EndIf
      
      Debug DirectoryEntryName(0) + Type$ + "- Größe in Bytes: " + Str(DirectoryEntrySize(0))
    Wend
    FinishDirectory(0)
  EndIf

Unterstützte OS

Alle