dali

 
@echo off
for %%. in (张三 李四 王五 赵六) do call :ca %%.
start b.txt
exit
:ca
setlocal enabledelayedexpansion
if exist b.txt for /f "tokens=1-3 delims= " %%i in (b.txt) do set n=%%i
for /f "tokens=1-3 delims=: " %%a in ('findstr /n %1 a.txt') do (set/a n+=1&set/a m+=%%c&&>>b.txt echo !n! %1 %%c)
set/a n+=1&&echo !n! 合计 %m% >>b.txt
goto :eof
复制代码

[ 本帖最后由 dali 于 2009-6-10 21:12 编辑 ]