Rubrique précédente: FindFirstFile : Rechercher des fichiers dans un répertoireRubrique suivante: FindNextFile – Poursuivre l'analyse de répertoire FindFirstFile


FindNext

Valide sur les plates-formes NetWare, Symbian OS, UNIX, Windows et Windows CE

La fonction FindNext continue une analyse de répertoire et permet d'extraire les fichiers suivants qui satisfont aux critères donnés dans FindFirst. Un nom de fichier est renvoyé pour chaque appel FindNext, jusqu'à ce que plus aucun fichier correspondant ne soit trouvé dans le répertoire.

Format de la fonction :

FindNext() as string

Chaque appel de FindNext renvoie un nom de fichier. Lorsqu'aucun autre fichier correspondant n'est trouvé dans le répertoire, elle renvoie une chaîne vide ("").

Exemple :

Dim Filename as string

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