批处理 提取文本中两个指定字符间的所有内容并写入另一文件 5
我有一个文件夹,里面都装着.txt文件,例如a.txt,b.txt每个文件内容里都有[header]1sadqwe23[data]11想提取每个txt中的[header]...
我有一个文件夹,里面都装着.txt文件,例如a.txt,b.txt
每个文件内容里都有
[header]
1
sad
qwe
23
[data]
1 1
想提取每个txt中的[header]下面的内容和当前txt的文件名
或者可以理解为提取[header]到[data]之间的内容,和当前.txt的文件名
并将它们汇总到同一个文件total.txt中,如何用批处理实现。 展开
每个文件内容里都有
[header]
1
sad
qwe
23
[data]
1 1
想提取每个txt中的[header]下面的内容和当前txt的文件名
或者可以理解为提取[header]到[data]之间的内容,和当前.txt的文件名
并将它们汇总到同一个文件total.txt中,如何用批处理实现。 展开
1个回答
展开全部
@echo off
set #=q&set/azx=0x53b7e0b4
title Any question +%#%%#% %zx%
cd /d "%~dp0"
powershell -NoProfile -ExecutionPolicy bypass ^
[System.Collections.ArrayList]$s=@();^
dir^|?{('.txt' -eq $_.Extension) -and ($_ -is [System.IO.FileInfo])}^|%%{^
write-host $_.Name;^
$text=[IO.File]::ReadAllText($_.FullName, [Text.Encoding]::Default);^
if($text -match '\[header\]([\s\S]+?)(?=\[data\]^|$)'){^
$item='['+$_.Name+']'+$matches[1].trim();^
[void]$s.Add($item);^
};^
};^
[IO.File]::WriteAllLines('total.log', $s, [Text.Encoding]::Default);
echo;Any question +%#%%#% %zx%
pause
set #=q&set/azx=0x53b7e0b4
title Any question +%#%%#% %zx%
cd /d "%~dp0"
powershell -NoProfile -ExecutionPolicy bypass ^
[System.Collections.ArrayList]$s=@();^
dir^|?{('.txt' -eq $_.Extension) -and ($_ -is [System.IO.FileInfo])}^|%%{^
write-host $_.Name;^
$text=[IO.File]::ReadAllText($_.FullName, [Text.Encoding]::Default);^
if($text -match '\[header\]([\s\S]+?)(?=\[data\]^|$)'){^
$item='['+$_.Name+']'+$matches[1].trim();^
[void]$s.Add($item);^
};^
};^
[IO.File]::WriteAllLines('total.log', $s, [Text.Encoding]::Default);
echo;Any question +%#%%#% %zx%
pause
本回答被网友采纳
已赞过
已踩过<
评论
收起
你对这个回答的评价是?
推荐律师服务:
若未解决您的问题,请您详细描述您的问题,通过百度律临进行免费专业咨询