[Ошибки] Ошибка error: missing Next

[x-vit]

Здравствуйте!
Был взят код от сюда: http://autoit-script.ru/index.php?topic=8238.msg55601#msg55601

Встала дополнительная задача его зациклить.
С помощью:

For $i = 1 To 5

Next

Получился такой результат:

#Include <File.au3>
For $j = 1 To 5

_FindFiles('C:', '*.txt')
Func _FindFiles($sRoot, $sFile)
    Local $FileList
    $FileList = _FileListToArray($sRoot, $sFile, 1)
    If Not @error Then
        For $i = 1 To $FileList[0]
            ConsoleWrite($sRoot & '\' & $FileList[$i] & @CR)
            $Read = FileRead($sRoot & '\' & $FileList[$i]) ;Считываем файл
            $Replace = StringRegExpReplace($Read, 'Меняем', 'Поменяели') ;Делаем изменение
            FileDelete($sRoot & '\' & $FileList[$i]) ;Удаляем файл
            FileWrite($sRoot & '\' & $FileList[$i], $Replace) ;На его место записываем измененный файл
        Next
    EndIf
    $FileList = _FileListToArray($sRoot, '*', 2)
    If Not @error Then
        For $i = 1 To $FileList[0]
            _FindFiles($sRoot & '\' & $FileList[$i], $sFile)
        Next
    EndIf
EndFunc

Next

MsgBox(0, 'Циклы - КОНЕЦ', 'КОНЕЦ!' )

При запуске выдает: error: missing Next

Подскажите как выйти из ситуации!

 

[ra4o]

Не нужно в цикл включать саму функцию, сделайте так :

For $j=1 to 5
	_FindFiles('C:', '*.txt')
Next

 

[x-vit]

Спасибо! Всё заработало!