FileFindNextFile
Возвращает имя файла, соответствующее указанному дескриптору поиска.
FileFindNextFile ( search )
Параметры
search | Дескриптор поиска, возвращённый функцией FileFindFirstFile(). |
Возвращаемое значение
Успех: | Возвращает следующее имя файла/каталога, @extended принимает значения 1 = каталог или 0 = файл. |
Ошибка: | Устанавливает @error равным 1, если больше нет файлов/каталогов, соответствующих поиску. |
Примечания
После окончания работы с функциями FileFind... необходимо вызвать FileClose() для освобождения ресурсов, выделенных дескриптору поиска.См. также
FileClose, FileFindFirstFileПример
; Скрипт показывает имена всех файлов и каталогов в указанной директории.
$sPath = @HomeDrive
$hSearch = FileFindFirstFile($sPath & '\*.*') ; возвращает дескриптор поиска, определяющий путь и маску
; Проверка, является ли поиск успешным
If $hSearch = -1 Then
MsgBox(4096, "Ошибка", "Ни один из файлов или каталогов не соответствует маске поиска")
Exit
EndIf
While 1
$sFile = FileFindNextFile($hSearch) ; возвращает имя следующего файла, начиная от первого до последнего
If @error Then ExitLoop
If @extended Then
$sType = 'Каталог: '
Else
$sType = 'Файл: '
EndIf
$iAnswer = MsgBox(1, 'Следующий элемент', $sType & @TAB & $sFile & @LF & 'Путь: ' & @TAB & $sPath & '\' & $sFile)
If $iAnswer = 2 Then ExitLoop
WEnd
; Закрывает дескриптор поиска
FileClose($hSearch)