[文件操作] 求一批处理按文件名排序后批量重命名

gavincar

文件夹中有很多QQ截图得到的jpg文件。
如：QQ截图20150113153921.jpg

如何用一批处理实现将这些文件批量重命名为：
000001.pdg
000002.pdg
……
000101.pdg

说明：
1、排序为按文件名排序，数字小的在前，数字大的在后。
2、批处理文件能将当前文件夹下的jpg进行重命名，最好也能对子文件夹下的也能重命名。

apang

@echo off & setlocal enabledelayedexpansion
::pushd "D:\Test\"
for /f "delims=" %%a in ('dir /a-d/on/b/s "QQ截图*.jpg"') do (
        if /i "%%~dpa" NEQ "!sPath!" (
                set "sPath=%%~dpa"
                set n=1000001
        ) else set /a n+=1
        Ren "%%a" !n:~1!.jpg
        
)
pause
复制代码