Что нового

[Данные, строки] Разбить файл на несколько файлов по N строк

KarSar

Новичок
Сообщения
15
Репутация
0
Версия AutoIt: v3.3.7

Описание:

Выбрать *.txt файл. Обработать следующим образом:
В файле big.txt 1000 строк. Необходимо создать 10 файлов записав туда по 100 строк с файла big.txt, чтобы таким образом разбить файл.

Примечания:
Текст внутри строки не важен, но важно чтобы все строки в итоге были.
В 1 файле - первые сто строк, во втором файле с 100 - 200 строки, в 3 файле с 300 - 400 строки и т.д.
Самые последние строки соответственно в последнем созданном файле.
 

joiner

Модератор
Локальный модератор
Сообщения
3,556
Репутация
628
Код:
#include <file.au3>
#include <array.au3>
Local $array
_FileReadToArray(@ScriptDir & '\big.txt', $array)
_ArrayDelete($array, 0)
$n = 0
$x = 1
While 1
	$ubound = UBound($array)
	If $ubound = 0 Then ExitLoop
	For $i = 0 To $ubound
		FileWriteLine($x & '.txt', $array[$i])
		_ArrayDelete($array, $i)
		ExitLoop
	Next
	$n += 1
	If $n = 10 Then ; считываем под десять строк и пишем в отдельный файл
		$n = 0
		$x += 1
	EndIf
WEnd



Добавлено:
Сообщение автоматически объединено:

можно и по другому. считывать по одной строке и писать в файл. по достижении нужного количества строк- создаем следующий файл. вобщем, кто как хочет, так и пляшет :smile:
 

InnI

AutoIT Гуру
Сообщения
4,922
Репутация
1,432
KarSar
http://autoit-script.ru/index.php/topic,15599
 
Верх