文本为:
王一,2
王一,5
张二,4
张二,5
张二,8
刘三,2
求输出结果为:
王一,2 5
张二,4 5 8
刘三,2
[ Last edited by haiyuey on 2009-4-21 at 00:11 ]
王一,2
王一,5
张二,4
张二,5
张二,8
刘三,2
求输出结果为:
王一,2 5
张二,4 5 8
刘三,2
[ Last edited by haiyuey on 2009-4-21 at 00:11 ]
联盟域名:www.cn-dos.net 论坛域名:www.cn-dos.net/forum
DOS,代表着自由开放与发展,我们努力起来,学习FreeDOS和Linux的自由开放与GNU精神,共同创造和发展美好的自由与GNU GPL世界吧!
@echo off
setlocal ENABLEDELAYEDEXPANSION
if exist b.txt del b.txt
set m=""
for /f "tokens=1,2 delims=," %%i in (a.txt) do (
if /i not "%%i"=="!m!" (
>>b.txt echo %%i,%%j
set m=%%i
) else (
sed -i "s/^%%i.*/& %%j/" b.txt
sed -i "s/$/\r/" b.txt
set m=%%i
)
)
@echo off&setlocal enabledelayedexpansion
set "file=a.txt"
set /p var=<"%file%"
set "var2=%var:*,=%" & set var=!var:,%var:*,=%=!
(for /f "usebackq skip=1 tokens=1,2 delims=," %%a in ("%file%") do (
if "%%a" neq "!var!" (
echo !var!,!var2!
set "var=%%a" & set var2=%%b
) else set var2=!var2! %%b
)
echo !var!,!var2!)>result.txt
start result.txt@echo off&setlocal enabledelayedexpansion
for /f "tokens=1,2 delims=, " %%a in (%~n0.txt) do (set "#%%a=!#%%a!%%b ")
for /f "tokens=1,2 delims==#" %%a in ('set #') do (echo %%a,%%b)
pause
The maximum individual environment variable size is 8192bytes.
The maximum total environment variable size for all variables, which includes variable names and the equal sign, is 65,536KB.
set fso=createobject("scripting.filesystemobject")
set file=fso.opentextfile("1.txt")
do while file.atendofstream<>true
n=file.readline:s=split(n,","):a=s(0):b=s(1)
if instr(sn,a)=0 then
n=vbcrlf &n:sn=a:sm=sm & n
else
sm=sm & " " &b
end if
loop
file.close
wsh.echo mid(sm,3)
fso=WScript.createobject("scripting.filesystemobject");
sss=fso.opentextfile("a.txt").readall();
re=/((?:\n|^)(+),+)\r\n((?:.*\r\n)*?)(?:\2,(+\r\n))/
while(re.test(sss))sss=sss.replace(re,"$1 $4$3");
fso.createtextfile("a_dest.txt",1,0).write(sss)