
附件 1:1.txt (2008-8-6 22:20, 13.62 K,下载次数: 30)
CODE: [Copy to clipboard]@echo off
Setlocal Enabledelayedexpansion
for %%i in (*.txt) do call :ren_ "%%i"
pause&goto :eof
:ren_
for /f "tokens=1* delims=:" %%a in ('findstr /n .* %1') do (set "dos%%a=%%b")
for /f "tokens=1 delims=:" %%c in ('findstr /n 开放分类 %1') do (set /a "m=%%c-1")
echo ren %1 "!dos%m%!.txt"
| 欢迎光临 中国DOS联盟论坛 (http://cndos.fam.cx/forum/) | Powered by Discuz! 2.5 |