批处理之家 » BAT求助&讨论 » 批处理按照行数割文本文件怎么写？

[新手上路]批处理新手入门导读	[视频教程]批处理基础视频教程	[视频教程]VBS基础视频教程	[批处理精品]批处理版照片整理器
[批处理精品]纯批处理备份&还原驱动	[批处理精品]CMD命令50条不能说的秘密	[在线下载]第三方命令行工具	[在线帮助]VBScript / JScript 在线参考

返回列表发帖

Rank: 5 Rank: 5

帖子: 908
积分: 1213
技术: 3
捐助: 0
注册时间: 2018-1-17

1楼 跳转到 » 倒序看帖

字体大小: tT

发表于 2024-5-20 10:36 | 只看该作者

[文本处理] 批处理按照行数割文本文件怎么写？

一个文本文件，需求按照30行进行分割成
原文件名-001.txt,
原文件名-002.txt
依次类推

虽然有split命令可以分割，但我还想知道
用批处理如何处理？

Rank: 12

帖子: 14848
积分: 46044
技术: 854
捐助: 745
注册时间: 2008-6-9

2楼

发表于 2024-5-20 10:51 | 只看该作者

回复 1# netdzb

http://bbs.bathome.net/thread-1181-1-1.html
http://bbs.bathome.net/thread-4440-1-1.html
http://bbs.bathome.net/thread-5380-1-1.html
http://bbs.bathome.net/thread-11549-1-1.html
http://bbs.bathome.net/thread-15394-1-1.html
http://bbs.bathome.net/thread-17363-1-1.html
http://bbs.bathome.net/thread-21506-1-1.html
http://bbs.bathome.net/thread-23199-1-1.html
http://bbs.bathome.net/thread-27116-1-1.html

我帮忙写的代码不需要付钱。如果一定要给，请在微信群或QQ群发给大家吧。
【微信公众号、微信群、QQ群】http://bbs.bathome.net/thread-3473-1-1.html
【支持批处理之家，加入VIP会员！】http://bbs.bathome.net/thread-67716-1-1.html

Rank: 7 Rank: 7 Rank: 7

帖子: 2626
积分: 3825
技术: 389
捐助: 0
注册时间: 2016-2-20

3楼

发表于 2024-5-20 14:22 | 只看该作者

@echo off
set n=0
set x=30
set /a y=x-1
set z=1000
setlocal enabledelayedexpansion
for /f "delims=" %%i in (test.txt) do (
    set /a m=n%%x
    set /a n+=1
    set str!m!=%%i
    if !m! equ %y% (
        set /a z+=1
        (for /l %%j in (0,1,%y%) do (
            echo,!str%%j!
        ))>test-!z:~-3!.txt
    )
)
set /a z+=1
if !m! neq %y% (
    (for /l %%j in (0,1,!m!) do (
        echo,!str%%j!
    ))>test-!z:~-3!.txt
)
复制代码

未经测试

Rank: 5 Rank: 5

帖子: 908
积分: 1213
技术: 3
捐助: 0
注册时间: 2018-1-17

4楼

发表于 2024-5-20 14:38 | 只看该作者

回复 3# qixiaobin0715

echo , 加个逗号是什么意思啊？
代码写的挺讲究啊，都考虑到30000行文本的分割了，谢谢噢！

Rank: 7 Rank: 7 Rank: 7

帖子: 2626
积分: 3825
技术: 389
捐助: 0
注册时间: 2016-2-20

5楼

发表于 2024-5-20 14:53 | 只看该作者

逗号空格是一个意思

Rank: 6 Rank: 6

帖子: 1352
积分: 2301
技术: 296
捐助: 50
注册时间: 2022-9-18

6楼

发表于 2024-5-20 17:10 | 只看该作者

回复 4# netdzb

批处理技术内幕：ECHO命令

bat小白，请多指教！谢谢！

Rank: 6 Rank: 6

帖子: 1352
积分: 2301
技术: 296
捐助: 50
注册时间: 2022-9-18

7楼

发表于 2024-5-20 17:27 | 只看该作者

@echo off
cd /d "%~dp0"

set file=1.txt
set l=30
set _0=3

set m=10000001
for /f "delims=" %%i in ("%file%") do (
	for /f "tokens=1* delims=[]" %%a in ('find /n /v "" ^<"%%i"') do (
		setlocal enabledelayedexpansion
		for /f %%x in ("!m:~-%_0%!") do (
			endlocal
			>>"%%~ni-%%x%%~xi" echo=%%b
		)
		set /a n=%%a%%%l%,1/n 2>nul || set /a m+=10000001
	)
)
pause
复制代码

bat小白，请多指教！谢谢！

Rank: 2

帖子: 120
积分: 162
技术: 0
捐助: 0
注册时间: 2023-4-12

8楼

发表于 2024-5-20 18:21 | 只看该作者

回复 7# 77七

77七大佬，求助新帖期待您出手相助

Rank: 5 Rank: 5

帖子: 599
积分: 841
技术: 79
捐助: 0
注册时间: 2021-8-26

9楼

发表于 2024-5-20 18:37 | 只看该作者

分割的文件结尾会多一个换行符
编码全部gbk或ansi

@echo off

set @file=test.txt
set hangshu=30
set shuliang=0
set houzhuishuzi=1000
set "houzhui=_!shuliang:~-3!"

for %%a in ("%@file%") do set @newfile=%%~na&set @fileext=%%~xa
for /f "usebackq delims=" %%i in (`findstr /n .* "%@file%"`) do (
set "line=%%i"
set /a shuliang=aaa/hangshu+houzhuishuzi+1
set /a aaa+=1
setlocal enabledelayedexpansion
if not defined @%houzhui% (
echo create file !@newfile!%houzhui%!@fileext!
cd. >"!@newfile!%houzhui%!@fileext!"
for %%z in ("@%houzhui%") do endlocal&set %%~z=1
) else (endlocal)
setlocal enabledelayedexpansion
(
echo(!line:*:=!|| ^)?
)>>"!@newfile!%houzhui%!@fileext!"
endlocal
)
pause&exit/b
复制代码