[решено] "Слить" в один файл все текстовые файлы из папки

kaster · Конфигурация компьютера

sashadeg, что значит слить? объединить содержимое каждого файла в один большой? если да, то очень просто.

Код:

$sPath = 'Folder with files'
$search = FileFindFirstFile($sPath & '\*.vkp')

$sContent = ''
While 1
    $sFile = FileFindNextFile($search)
    If @error Then ExitLoop
    $sContent &= FileRead($sPath & '\' & $sFile) & @CRLF
WEnd

FileWrite($sPath & '\' & 'summary.vkp', $sContent)

sashadeg · Отправлено: **16:25, 05-03-2010** | #3

Цитата kaster:

FileFindFirstFile($sPath & '\*.vkp') »

WoW Вот то что мне нужно было

Спасибо!!!