但是只是我个人感觉

@echo off
cd /d "D:\123"
set "FileNum=11"
setlocal enabledelayedexpansion
for /f "delims=" %%i in ('dir /b /a-d *.pdf') do (
    echo Change name from "%%i" to "!FileNum!%%~xi"
    ren "%%i" "!FileNum!%%~xi"
    set /a FileNum+=1
)
pause
复制代码

@echo off&setlocal enabledelayedexpansion
rem 将文件存为ANSI编码  新文件名保存入list.txt
set "ph=d:\123"
REM 统计 list.txt 内文件数量并赋值 如果d:\123内已经存在文件退出
for /f "delims=" %%i in (list.txt) do (
     if exist "!ph!\%%i" (
        set str=!ph! 已存在 %%i 文件
        goto :end
     )
     set /an+=1
     set "new_file_!n!=%%i"
)

REM 统计 d:\123 内文件数量并赋值
for /f "delims=" %%i in ('dir /b /a-d "!ph!\*.pdf"') do (
     set /a m+=1
     set "file_!m!=%%i"
)

REM 比较文件数量 这里 list.txt 的文件数少于d:\123文件数 就退出
if !m! gtr !n! set str=!ph! 的文件数量与 list.txt 不符&goto :end
for /l %%i in (1,1,!n!) do ren "!ph!\!file_%%i!" "!new_file_%%i!"
set str=共计完成 "!ph!" 文件夹的 !n! 个文件的重命名
:end
echo;!str!
pause
复制代码

@echo off
rem 将list.txt和批处理文件存放在同目录下  "D:\123\" 即文件目录
cd /d "D:\123\"
setlocal enabledelayedexpansion
set /a n=0
for /f "delims=" %%i in ('dir /b /a-d /o:d') do (
	set /a n=n+1,m=0
	for /f "delims=" %%a in ('type "%~dp0list.txt"') do (
		set /a m=m+1
		if !n! equ !m! (
			echo ren "%%i" "%%a"
			ren "%%i" "%%a"
		)
	)
)
endlocal
pause
复制代码

for /l %%i in (1,1,!n!) do ren "!ph!\!file_%%i!" "!new_file_%%i!"
复制代码

@echo off
rem 匹配文件名包含扩展名 后7位，即后7位如包含在新名中就执行改名
rem 注意  xxxxxx.xxx  的后7位 为  xxx.xxx
rem 使用前先测试
setlocal enabledelayedexpansion
set n=7
cd /d "D:\AAA\"
for /f "delims=" %%i in ('dir /b /a-d ') do (
        set "str=%%~nxi"
        set "str=!str:~-%n%!"
        set m=
        for /f "delims=" %%a in ('type "%~f0" ^| find "!str!"') do (
                if not defined m (
                        echo ren "%%i" "%%a"
                        ren "%%i" "%%a"
                        set m=1
                )
        )
)
endlocal
pause
exit
:以下存放新名
1-001-john.txt
复制代码