批处理之家 - Powered by Discuz! Board

标题: [文本处理] 求批处理：依据文本空行来分割成独立带编号的.txt文件 [打印本页]

作者: zhh723 时间: 2018-12-12 18:12 标题: 求批处理：依据文本空行来分割成独立带编号的.txt文件

依据文本内容里面的空行来分割成独立带编号的.txt文件，最好编号也能自定义，比如20181212-01、20181212-02、20181212-**
搜索了几个小时都没有找到合适的，请求哪位老大给个准确的批处理代码！

作者: zhh723 时间: 2018-12-12 19:23

已经知道了谢谢！

作者: yhcfsr 时间: 2018-12-12 19:24

本帖最后由 yhcfsr 于 2018-12-12 19:29 编辑

上个版本有BUG,遇到一些特殊英文字符会丢数据,特此更新

@echo off

rem 设置源文件
set "TXT=C:\Users\CaoFei\Desktop\test.txt"
if not exist "%TXT%" echo;源文件不存在&pause&exit

set "dd=%date:~,4%%date:~5,2%%date:~8,2%"
set "n=101"

for /f "tokens=1,*delims=:" %%a in ('findstr /n ".*" "%TXT%"') do (
	set "str=%%b"
	if "%%b"=="" set/a "n+=1"
	setlocal enabledelayedexpansion
	if "%%b" neq "" echo;!str!>>"%dd%-!n:~-2!.txt"
	endlocal
)
pause
复制代码

作者: flashercs 时间: 2018-12-12 19:41

@echo off
set "srcfile=1.txt"
powershell -Command "$file='%srcfile%';$dstDir='%~dp0';$n=1;$date=Get-Date -Format 'yyyyMMdd';[regex]::Split([System.IO.File]::ReadAllText($file,[System.Text.Encoding]::Default),'^\s*\n',[System.Text.RegularExpressions.RegexOptions]::Multiline)|Where-Object{$_ -notmatch '^\s*$'}|ForEach-Object{Set-Content -LiteralPath ($dstDir + $date +'-' + $n + '.txt') -Value $_ -Encoding Default;$n++}"
pause
exit /b
复制代码

欢迎光临批处理之家 (http://www.bathome.net/)