中国DOS联盟论坛

中国DOS联盟

-- 联合DOS 推动DOS 发展DOS --

联盟域名:www.cn-dos.net  论坛域名:www.cn-dos.net/forum
DOS,代表着自由开放与发展,我们努力起来,学习FreeDOS和Linux的自由开放与GNU精神,共同创造和发展美好的自由与GNU GPL世界吧!

游客:  注册 | 登录 | 命令行 | 搜索 | 上传 | 帮助 »
作者:
标题: [求助]提取文本指定行内容 上一主题 | 下一主题
hgx126
初级用户





积分 100
发帖 80
注册 2008-9-12
状态 离线
『楼 主』:  [求助]提取文本指定行内容

有一文本文件a.txt,内容有上万条内容,其中一部份如下: G101,1090023001,200706,30,20000,20000229,0,20000 G101,1090023001,200707,31,20000,20000229,0,20000 G101,1090023001,200708,31,20000,20070731,20000,0 G101,1090023002,200705,31,10000,20000427,0,10000 G101,1090023002,200706,30,10000,20000427,0,10000 G101,1090023002,200707,31,10000,20000427,0,10000 G101,1090023002,200708,31,10000,20070731,10000,0 G101,930000109024540000,200703,31,0,20060427,0,50000 G101,930000109024540000,200812,31,50000,20070731,0,30000 G101,930000109024540000,200901,31,50000,20070731,0,30000 G101,54110118047141,200708,31,0,20070706,0,80000 …… 以每行的第二列(以逗号为分隔符)数据比较下一行第二列的数据,如果不相同则提取该行到b.txt,与下一行第二列的数据相同则不提取。提取b.txt后的结果如下: G101,1090023001,200708,31,20000,20070731,20000,0 G101,1090023002,200708,31,10000,20070731,10000,0 G101,930000109024540000,200901,31,50000,20070731,0,30000 即是有红字所在行。 求大家帮帮忙!


2009-1-31 02:03
查看资料  发送邮件  发短消息  网志   编辑帖子  回复  引用回复
netbenton
银牌会员

批处理编程迷


积分 1916
发帖 752
注册 2008-12-28
来自 广西
状态 离线
『第 2 楼』:  

@echo off set two= for /f "tokens=1,2,* delims=," %%a in (a.txt) do ( call :sub %%a %%b "%%c" ) goto :eof :sub if not defined two goto :sk if not "%two%"=="%2" >>b.txt echo.%str% :sk set "two=%2" set "str=%1,%2,%~3" goto :eof 谢绝 slore 提点 不好意思,修改一下,这次应该可以了 [ Last edited by netbenton on 2009-1-31 at 11:37 ]




精简 [你的+我的+他的]=>[大家的] 个人网志
2009-1-31 03:13
查看资料  发送邮件  发短消息  网志  OICQ (37659560)  编辑帖子  回复  引用回复
slore
铂金会员





积分 5212
发帖 2478
注册 2007-2-8
状态 离线
『第 3 楼』:  3个错误哦

1. 文件,for要/f 2. tokens=1,2,* call %%c不代表第3个分割以后的全部仅表示第3个(Call按,分割)。 3.逻辑错误 str默认为空,则输出了第一行而不是第3行。同理下面的数据都错了,得到的是每组相同的第一个而不是最后一个。 [ Last edited by slore on 2009-1-31 at 14:28 ]




S smile 微笑,L love 爱,O optimism 乐观,R relax 放松,E enthusiasm 热情...Slore
2009-1-31 03:51
查看资料  发短消息  网志   编辑帖子  回复  引用回复
hgx126
初级用户





积分 100
发帖 80
注册 2008-9-12
状态 离线
『第 4 楼』:  

谢谢netbenton及slore兄帮了我的大忙。 [ Last edited by hgx126 on 2009-1-31 at 12:47 ]


2009-1-31 12:27
查看资料  发送邮件  发短消息  网志   编辑帖子  回复  引用回复

请注意:您目前尚未注册或登录,请您注册登录以使用论坛的各项功能,例如发表和回复帖子等。


可打印版本 | 推荐给朋友 | 订阅主题 | 收藏主题



论坛跳转: