; Скрипт показывает имена всех файлов в текущей директории.
$hSearch = FileFindFirstFile("*.*") ; возвращает дескриптор поиска

; Проверка, является ли поиск успешным
If $hSearch = -1 Then
	MsgBox(4096, "Ошибка", "Ни один из файлов или каталогов не соответствует маске поиска")
	Exit
EndIf

While 1
	$sFile = FileFindNextFile($hSearch) ; возвращает имя следующего файла, начиная от первого до последнего
	If @error Then ExitLoop

	$iAnswer = MsgBox(1, "Следующий файл / каталог:", $sFile)
	If $iAnswer = 2 Then ExitLoop
WEnd

; Закрывает дескриптор поиска
FileClose($hSearch)