-
AutoIt
(
http://forum.oszone.net/forumdisplay.php?f=103)
"Слить" в один файл все текстовые файлы из папки
Возможно ли это? просто у меня возникла проблема работе с группой файлов... Допустим имеется 100 текстовиков с расширением .vkp, нужно слить всё в один файл
|
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)
|
Цитата:
Цитата kaster
FileFindFirstFile($sPath & '\*.vkp') »
|
WoW Вот то что мне нужно было =) Спасибо!!!
|
Время: 21:37.
© OSzone.net 2001-