Board logo

标题: 求批处理一个 改名的 要求如下 [打印本页]

作者: cmssky     时间: 2008-3-23 14:05    标题: 求批处理一个 改名的 要求如下

在A文件夹下有N个文件夹       A1 A2 ......AN
每一个文件夹下都有一个文件   B1 B2........BN
在A文件夹下另外有一个rename.txt文件
文件内容有N行 每行都有一个字符串
2156487478
4578484874
.................
1256454458

要求有一个批处理  
自动读取rename.txt文件对应的行数内容为文件B1 B2........BN改名
例如 读取第一行2156487478 将文件B1改名为2156487478
        读取第二行4578484874将文件B2改名为4578484874

可能是我想复杂了 搞了N久都没有搞好 请高手帮忙
作者: wxcute     时间: 2008-3-23 14:39
把rename.txt文件拖到此批处理中运行。
此处我假设文件扩展名为.txt,不是的话自己改。
cd /d "%~dp1"
for /f "delims= eol=" %%i in ('findstr /n .* %1') do (
    set "str=%%i"
    call set "str=%%str:*:=%%"
    call :rn
)
goto :eof
:rn
set/a num+=1
ren "A%num%\B%num%.txt" "%str%.txt"
goto :eof

cd /d "%~dp1"
for /f "delims= eol=" %%i in ('findstr /n .* %1') do (
    set "str=%%i"
    call set "str=%%str:*:=%%"
    call :rn
)
goto :eof
:rn
set/a num+=1
ren "A%num%\B%num%" "%str%"
goto :eof
[ Last edited by wxcute on 2008-3-23 at 02:42 PM ]
作者: cmssky     时间: 2008-3-24 13:00
Thank U very much