Windows文件重命名批处理

同标题 文件重命名

@echo off     
echo       *******文件批量重命名*******   
echo ╔------------------------------------╗ 
echo         Version 0.0.1      
echo            版权没有，翻版不究               
echo             Change 2011-04-28    
echo ╚------------------------------------╝ 

echo. 
echo *请依次输入新文件名和文件类型
echo *若文件名为空,按当前目录名操作
echo.

set /p filename=新文件名:
IF "%filename%"=="" set "filename=%%~ni"

set /p suffix=文件类型:
IF "%suffix%"==""   echo.文件类型不能为空 &goto error
IF NOT EXIST *.%suffix% echo.不存在该格式文件 &goto error

setlocal ENABLEDELAYEDEXPANSION
for /r %%i in (.) do (
        set n=1000
        for /f "delims=" %%a in (' dir /b "%%i\*.%suffix%" 2^>nul ') do (
                set /a n+=1
                ren "%%i\%%a" "%filename%"!n:~1!%%~xa
        )
)

echo. &pause
exit

:error
echo. &pause