@echo off
rem 批处理保存为ansi编码格式。路径末尾以 \ 结束
call :1 "c:\指定目录1\"
call :1 "c:\指定目录2\"
call :1 "c:\指定目录3\"

for %%a in (c d e) do call :2 "%%a:\"
pause & exit

	:1
	set _"%~1"=1
	rem 如果不需要排除子目录删除下一行
	for /r "%~1" /d %%d in (*) do set _"%%d\"=1
	exit /b

	:2
	for /r "%~1" %%i in (*.pdf *.doc *.xls) do (
		if not defined _"%%~dpi" (
			echo del "%%i"
		)
	)
	exit /b
复制代码

@echo off
set "ExFolder1=指定目录1"（完整路径）
set "ExFolder2=指定目录2"（完整路径）
...

ren "%ExFolder1%\*.*" "*.*.1"
ren "%ExFolder1%\*.*" "*.*.1"
...

for %%i in (C D F) do (
if exist %%i:\
for %%j in (pdf doc xls) do (
del /s %%i:\*.%%j
)
)

ren "%ExFolder1%\*.*" "*."
ren "%ExFolder2%\*.*" "*."
...
复制代码

@echo off
REM 设置待排除的目录（注意以\结尾）
set "ExFolder1=C:\Users\Administrator\Desktop\"
set "ExFolder2=C:\Program Files\"
REM 导出的文件列表
set "OutFile=%~dp0备份.csv"
REM 设置新的临时后缀名
set "NewExt=ttttt"
>"%OutFile%" echo OldName,NewName
for %%a in (C D E) do (
    if exist %%a:\ (
        echo 正在搜索%%a:\
        pushd %%a:\
        for /f "delims=" %%b in ('dir /b /s /a-d *.pdf *.doc *.xls 2^>nul ^| find /v /i "%ExFolder1%" ^| find /v /i "%ExFolder2%" ') do (
            echo 正在查找 %%b
            >>"%OutFile%" echo "%%b","%%b.%NewExt%"
            REM 如果显示的结果没有问题，把下面的echo去掉再次执行即可重命名文件
            echo ren "%%b","%%~nxb.%NewExt%"
        )
        popd
    )
)
pause
复制代码

@echo off
set "InFile=%~dp0备份.csv"
for /f skip^=1^ tokens^=3^ delims^=^" %%a in ('type "%InFile%"') do (
    REM 如果显示的结果没有问题，把下面的echo去掉再次执行即可重命名文件
    echo ren "%%a" "%%~na"
)
pause
复制代码

@echo off
rem 批处理保存为ansi编码格式。路径末尾以 \ 结束
call :1 "c:\指定目录1\"
call :1 "c:\指定目录2\"
call :1 "c:\指定目录3\"

for %%a in (c d e) do call :2 "%%a:\"
pause & exit

	:1
	set _"%~1"=1
	rem 如果不需要排除子目录删除下一行
	for /r "%~1" /d %%d in (*) do set _"%%d\"=1
	exit /b

	:2
	for /r "%~1" %%i in (*.pdf *.doc *.xls) do (
		if not defined _"%%~dpi" (
			>>"重命名.bat" echo ren "%%i" "%%~ni.tttt"
			>>"恢复.bat" echo ren "%%~dpni.tttt" "%%~nxi"
		)
	)
	exit /b
复制代码