批量删除此目录下所有空文件夹批处理

for /f "delims=" %%i in ('dir /ad /b /s') do call :rd_dir_empty "%%i"goto :eofrem ======= 删除空目录 =========:rd_dir_emptyrd %1 2>nul||goto :eofset dir_route=%1for /f "delims=" %%i in (%dir_route%) do (     set dir_route="%%~dpi"     for /f "delims=" %%j in ('dir /ad /b "%%~dpi"')do rd "%%~dpi%%j" 2>nul||goto :eof):: 把路径最后的/去掉，以便set route_deepest="%%~dpi"能取到上一层路径if "%dir_route:~-2,1%"=="/" set dir_route="%dir_route:~1,-2%"if /i not "%cd%"==%dir_route% call :rd_dir_empty %dir_route%goto :eof