[已解决] 请教批处理格式化文本并对关键字进行统计

ouch1983 · 发表于 2012-6-2 09:10:09

回复 15# apang

哦，原来是这样。行首无标志的按照第一个有标志的为准，比如：
104/781 DWPI
PN - EP1419624       A1    20040519 DW200433
   AU2002324       A1    20030310 DW200452
   IN228968B       B    20090320 DW201010
标红的都是PN

ouch1983 · 发表于 2012-6-3 00:55:21

to: weichenxiehou

weichenxiehou · 发表于 2012-6-3 15:31:13

回复 17# ouch1983

@echo off&setlocal enabledelayedexpansion
set "tab= "
for /f "delims==" %%a in ('set # 2^>nul') do set %%a=
for /f "delims==" %%a in ('set $ 2^>nul') do set %%a=
for /f "tokens=1-5" %%a in ('findstr /v /i "dwpi" test.txt') do (
if /i "%%a"=="ap" (set flag=ap&set/a count=0)
if /i "%%a"=="pn" (set flag=pn&set/a count=0)
if "!flag!"=="ap" (
if !count! equ 0 (set "strb=%%d") else set "strb=%%b"
set/a "#!strb:~,4!+=1"
if not defined "$!strb:~,4!" set "$!strb:~,4!=0"
set/a count+=1
)
if "!flag!"=="pn" (
if !count! equ 0 (set "strb=%%e") else set "strb=%%c"
set/a "$!strb:~,4!+=1"
if not defined "#!strb:~,4!" set "#!strb:~,4!=0"
set/a count+=1
)
)
echo,%tab%PN%tab%AP>result.txt
for /f "tokens=1,2 delims=#=" %%a in ('set #') do (
echo,%%a%tab%!$%%a!%tab%%%b
)>>result.txt
start result.txt

复制代码

ouch1983 · 发表于 2012-6-3 15:33:29

十分感谢weichenxiehou老师，问题已解决，还给讲了很多

		自动登录	找回密码
密码			注册

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

[文本处理] [已解决] 请教批处理格式化文本并对关键字进行统计

评分