[amel27]

Lodoss, если без подкаталогов, то просто:

Код:

#Include <File.au3>

$sFPath = @WindowsDir
$aFiles = _FileListToArray($sFPath, '*', 1)
$iFiles = $aFiles[0]

MsgBox(64, "Результат", 'В папке "'& $sFPath & '" найдено '& $iFiles &' файлов.')