中国DOS联盟

有一文本文件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

即是有红字所在行。
求大家帮帮忙！

@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 ]

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 ]

谢谢netbenton及slore兄帮了我的大忙。

[ Last edited by hgx126 on 2009-1-31 at 12:47 ]