[文件操作] [已解决]BAT脚本批量将图片名称改为连续数字

@echo off &setlocal &set "n=0"
for /f "delims=" %%F in ('dir /b/a-d *.jpg,*.png,*.bmp,*.jpeg,*.gif') do (call :R "%%F")
pause&exit/b
:R
	set/a "n+=1"
	set "_nF=0000%n%"
	set "_nF=%_nF:~-4%"
	if exist "%_nF%%~x1" goto :R
	ren "%~1" "%_nF%%~x1" &exit/b
复制代码

@echo off
set n=10000
for /f "delims=" %%i in ('dir /b /ad') do (
    pushd "%%i"
    setlocal enabledelayedexpansion
    for /f "delims=" %%j in ('dir /b /a-d *.jpg,*.png,*.bmp,*.jpeg,*.gif 2^>nul') do (
        set /a n+=1
        ren "%%j" "!n:~1!%%~xj"
    )
    endlocal
    popd
)
pause
复制代码

@echo off
cd /d "%~dp0"
set "list=*.jpg *.png *.bmp *.jpeg *.gif"
setlocal enabledelayedexpansion
(for /l %%l in (10001,1,19999) do (
	set n=%%l
	echo !n:~-4!
)) > $1
endlocal
(for /r /d %%d in (*) do (
	pushd "%%d"
	for /f "delims=" %%i in ('dir /b /a-d %list% ^|findstr /rixc:"[0-9][0-9][0-9][0-9]\.[a-z]*"') do (
		echo %%~ni
	)
	popd
)) > $2
findstr /vg:$2 $1 > $3
(for /r /d %%d in (*) do (
	pushd "%%d"
	for /f "delims=" %%i in ('dir /b /a-d %list% ^|findstr /rivxc:"[0-9][0-9][0-9][0-9]\.[a-z]*"') do (
		set /p str=
		set file=%%i
		setlocal enabledelayedexpansion
		ren "!file!" "!str!%%~xi"
		endlocal
	)
	popd
)) < $3
del $?
pause
复制代码

@echo off
set n=10000
for /f "delims=" %%i in ('dir /b /ad') do (
    pushd "%%i"
    setlocal enabledelayedexpansion
    for /f "delims=" %%j in ('dir /b /a-d *.jpg,*.png,*.bmp,*.jpeg,*.gif 2^>nul') do (
        set /a n+=1
        ren "%%j" "!n:~1!%%~xj1"
    )
    for %%j in (jpg,png,bmp,jpeg,gif) do (if exist *.%%j1 ren *.%%j1 *.%%j)
    endlocal
    popd
)
pause
复制代码