删除当前及子文件夹中的空目录

在对文件进行操作的工程中不免会出现空目录的情况，你想怎么去删除那些空目录一个一个去找，然后删除？不会吧，这也太累了，用批处理吧，帮你提高工作效率的，它会准确的判断然后进行删除。

 

 
  
  
  
  

  
  
  
  
  
 
  
 
  
   
   
   
   
@echo off 
  
  
  
  
  
 
  
 
  
   
   
   
   
for /f "tokens=*" %%a in ('dir /b /ad /s "目标路径"^|sort /r') do rd "%%a" 2>nul 
  
  
  
  
  
 
  
 
  
   
   
   
   
pause 
  
  
  
  
  
 
  
 
  
   
   
   
   
goto :eof 
  
  
  
  
  
 
  
 
  
   
   
   
   
 
  
  
  
  
  
 
  
 
  
   
   
   
   
@echo off 
  
  
  
  
  
 
  
 
  
   
   
   
   
for /f "delims=" %%i in ('dir /ad /b /s') do call :rd_dir_empty "%%i" 
  
  
  
  
  
 
  
 
  
   
   
   
   
goto :eof 
  
  
  
  
  
 
  
 
  
   
   
   
   
 
  
  
  
  
  
 
  
 
  
   
   
   
   
 
  
  
  
  
  
 
  
 
  
   
   
   
   
rem ======= 删除空目录 ========= 
  
  
  
  
  
 
  
 
  
   
   
   
   
:rd_dir_empty 
  
  
  
  
  
 
  
 
  
   
   
   
   
rd %1 2>nul||goto :eof 
  
  
  
  
  
 
  
 
  
   
   
   
   
set dir_route=%1 
  
  
  
  
  
 
  
 
  
   
   
   
   
for /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 
 
 
 
 
 

 

 
  
  
  
  

代码的思路是这样的：

思路：列举所有目录(包括子目录)路径，然后，删除第一个路径最后一节上的文件夹；如果能删除这个文件夹，则删除上一层文件夹；如果还能删除，则继续上一步……直到当前目录为止；如果其中某一节不能删除，立即跳出，开始删除下一条路径中，最后一节上的文件夹……如此反复。

本文出自 “乔磊的博客 学习 进步” 博客，请务必保留此出处http://sucre.blog.51cto.com/1084905/416695