[DJ Mogarych]

Конкретно в данном случае должно быть 4 файла »

Не 4, а 3.

Код:

Count Name                      Group                                                            
----- ----                      -----                                                            
    3 0104812010017284212       {01048120100172842124zyRCc5WLVjw9, 01048120100172842124LdiqxZ...
    3 0134556645534534543       {0134556645534534543xAauUCEBEcvw9, 0134556645534534543x1uLev5...
    1 9634554654765756767       {9634554654765756767PgegCvfAy59S9}

Powershell

Код:

gc "C:\temp\in\file.txt" |group {$_.substring(0,19)} |% {
    $_.group > "C:\temp\out\$($_.name).txt"
}

[4eburashko]

Конкретно в данном случае должно быть 4 файла » Не 4, а 3. Код: Count Name Group ----- ---- ----- 3 0104812010017284212 {01048120100172842124zyRCc5WLVjw9, 01048120100172842124LdiqxZ... 3 0134556645534534543 {0134556645534534543xAauUCEBEcvw9, 0134556645534534543x1uLev5... 1 9634554654765756767 {9634554654765756767PgegCvfAy59S9} Powershell Код: gc "C:\temp\in\file.txt" |group {$_.substring(0,19)} |% { $_.group > "C:\temp\out\$($_.name).txt" }

Я не совсем правильно объяснил, если совпадений нет (как у первой строки), то она одна сохраняется в файл, поэтому файлов не 3, а 4. То есть основной файл разделяется на группы

[DJ Mogarych]

У первой строки есть совпадения с пятой и шестой, и я вам выше показал, как это выглядит с точки зрения компьютера.
Решение вашей задачи тоже приведено.

[megaloman]

Код:

@Echo Off &Cls &>nul Chcp 1251
	Set "FileIn=Z:\Box_In\allstring.txt"
	Set "BoxOut=Z:\Box_Out"
	For /F "usebackq delims=" %%s In (`2^>nul More "%FileIn%"`) Do (
		Call :Out "%%s"
	)
Pause
Exit /B

:Out
	Set "Name=%~1"
	(>>"%BoxOut%\%Name:~0,19%" Echo %~1)
Exit /B

[4eburashko]

У первой строки есть совпадения с пятой и шестой, и я вам выше показал, как это выглядит с точки зрения компьютера. Решение вашей задачи тоже приведено.

Да, это я был невнимателен. Спасибо, все работает!

Код: @Echo Off &Cls &>nul Chcp 1251 Set "FileIn=Z:\Box_In\allstring.txt" Set "BoxOut=Z:\Box_Out" For /F "usebackq delims=" %%s In (`2^>nul More "%FileIn%"`) Do ( Call :Out "%%s" ) Pause Exit /B :Out Set "Name=%~1" (>>"%BoxOut%\%Name:~0,19%" Echo %~1) Exit /B

Ваш код тоже отлично работает, только не задаёт файлам расширение txt, у себя подправил, спасибо!

[4eburashko]

Код: @Echo Off &Cls &>nul Chcp 1251 Set "FileIn=Z:\Box_In\allstring.txt" Set "BoxOut=Z:\Box_Out" For /F "usebackq delims=" %%s In (`2^>nul More "%FileIn%"`) Do ( Call :Out "%%s" ) Pause Exit /B :Out Set "Name=%~1" (>>"%BoxOut%\%Name:~0,19%" Echo %~1) Exit /B

Почему то при большом исходном файле (около 2500 строк) картина немного другая. Пробовал несколько раз, создаётся 11-15 файлов, каждый раз по разному (если разделить вручную, то выходит около 40). При этом в консоль выводит информацию Процесс не может получить доступ к файлу. Количество проверяемых символов я изменил до 16, но проблема была и до изменения.

[megaloman]

4eburashko, заархивируйте исходный файл, приложите к сообщению. У меня на >3000 строк отрабатывает нормально, каждый раз одинаково, сумма строк в разделенных файлах и исходном совпадают

[4eburashko]

4eburashko, заархивируйте исходный файл, приложите к сообщению. У меня на >3000 строк отрабатывает нормально, каждый раз одинаково, сумма строк в разделенных файлах и исходном совпадают

В коде добавил только расширение файла txt

[megaloman]

4eburashko, На выходе 11 файлов, сколько не запускай. Хоть 16 символов хоть 19. txt не при чем. Может как-то антивирус пытается файлы анализировать и при этом их занимает и поэтому доступ блокируется? Единственное, в исходном файле конец строки 0A а на выходе 0D 0A