[分享]查找当前文件夹下全级次的空白子文件夹

hfxiang

1. 
   
2. @echo off
   
3. @rem 保存为ANSI格式
   
4. @rem 查找当前文件夹下全级次的空白子文件夹
   
5. cd /d "%~dp0"
   
6. setlocal enabledelayedexpansion
   
7. set "Previous_Folder=%~dp0"
   
8. for /f "delims=" %%a in ('dir/b/s/ad^|sort') do (
   
9.         set "Current_folder=%%a"
   
10.         call set "dif_str=%%Current_folder:!Previous_Folder!=%%
    
11.         if "!dif_str!" equ "%%a" call :Process_Empty_Folders
    
12.         set "Previous_Folder=!Current_folder!"
    
13. )
    
14. :Process_Empty_Folders
    
15. set "Empty_Folder="
    
16. for /f "delims=" %%b in ('dir/a/b "!Previous_Folder!"') do (
    
17.     set "Empty_Folder=%%b"
    
18. )
    
19. if "!Empty_Folder!." equ "." (
    
20.     echo "!Previous_Folder!" 是空文件夹
    
21. )
    

复制代码