Vorheriges Thema: FindClose - Abschließen eines SuchvorgangsNächstes Thema: FindFirstFile - Suchen nach Dateien in einem Verzeichnis


FindFirst - Zurückgeben des Namens der ersten bei der Suche gefundenen Datei

Gültig für NetWare, Symbian OS, UNIX, Windows und Windows CE.

Die Funktion "FindFirst" gibt den Namen der ersten Datei zurück, die den Kriterien eines angegebenen Filters entspricht.

Funktionssyntax:

FindFirst(Filter as string, Attrib as integer) as string
FindFirst(Filter as string) as string
Filter

Legt fest, welche Dateien gescannt werden sollen. Der Parameter kann Laufwerkangaben, einen Pfad oder Namen der zu suchenden Dateien beinhalten. Der Dateiname kann bei Bedarf Platzhalter (? oder *) enthalten.

Attrib

Gibt das Dateiattribut für die Auswahl der beim Scannen zu berücksichtigenden Dateien an. Wenn der Attrib-Parameter nicht angegeben wird, wird "FA_ALLFILES" verwendet. Dieses Attribut kann ausgewählt werden, indem die folgenden Werte mit OR verbunden werden:

FA_NONE

normale Datei, keine Attribute

FA_RDONLY

schreibgeschützte Dateien

FA_HIDDEN

versteckte Dateien

FA_SYSTEM

Systemdateien

FA_LABEL

Datenträgerbezeichnung

FA_DIR

Verzeichnis

FA_ARCHIVE

Archivdateien

FA_ALLFILES

Alle Dateien

FA_ANYFILE

Jede beliebige Datei

Bei erfolgreichem Abschluss gibt die Funktion "FindFirst" eine Zeichenfolge zurück, die den Namen der ersten übereinstimmenden Datei enthält. Andernfalls wird eine leere Zeichenfolge zurückgegeben.

Beispiel:

Dim Filename as string

Filename=FindFirst("C:\*.BAT",FA_ANYFILE)
while Filename<>""
	 print Filename
	 Filename=FindNext()
wend