[分享]批处理以文件夹名称为层级移动至父文件夹

Batcher

【问题描述】

如何把子文件夹剪切父文件夹层，子文件夹中文件跟着子文件夹，空文件夹和子文件夹中还有文件夹做个提示

Batcher

【解决方案】

test_1.bat 请参考Q-04把bat文件保存为ANSI编码：
https://mp.weixin.qq.com/s/Koje4FufWxWBs7ioDy_LJA

1. @echo off
   
2. cd /d "%~dp0"
   
3. setlocal enabledelayedexpansion
   
4. for /f "tokens=1,2,* delims=-" %%a in ('dir /b /ad *-*-*') do (
   
5.     echo 正在处理子文件夹 %%a-%%b-%%c
   
6.     set "AllN=0"
   
7.     set "FolderN=0"
   
8.     for /f "delims=" %%i in ('dir /b "%%a-%%b-%%c"') do (
   
9.         set /a "AllN+=1"
   
10.     )
    
11.     if !AllN! equ 0 (
    
12.         echo    情况[2] 是空文件夹
    
13.     ) else (
    
14.         for /f "delims=" %%i in ('dir /b /ad "%%a-%%b-%%c"') do (
    
15.             set /a "FolderN+=1"
    
16.         )
    
17.         if !FolderN! neq 0 (
    
18.             echo    情况[3] 两级子文件夹
    
19.         ) else (
    
20.             echo    情况[1] 正常待移动的子文件夹
    
21.         )
    
22.     )
    
23.     if not exist "%%a-%%b" (
    
24.         md "%%a-%%b"
    
25.     ) else if exist "%%a-%%b\%%a-%%b-%%c" (
    
26.         echo    情况[4] 父文件夹下存在同名文件夹 %%a-%%b\%%a-%%b-%%c
    
27.     ) else (
    
28.         move "%%a-%%b-%%c" "%%a-%%b"
    
29.     )
    
30. )
    
31. pause

复制代码

Batcher

test_2.bat

1. @echo off
   
2. REM 设置待处理的文件夹所在的目录
   
3. set "RootFolder=D:\示例"
   
4. setlocal enabledelayedexpansion
   
5. for /f "tokens=1,2,* delims=-" %%a in ('dir /b /ad "%RootFolder%\*-*-*"') do (
   
6.     echo 正在处理子文件夹 %%a-%%b-%%c
   
7.     set "AllN=0"
   
8.     set "FolderN=0"
   
9.     for /f "delims=" %%i in ('dir /b "%RootFolder%\%%a-%%b-%%c"') do (
   
10.         set /a "AllN+=1"
    
11.     )
    
12.     if !AllN! equ 0 (
    
13.         echo    情况[2] 是空文件夹
    
14.     ) else (
    
15.         for /f "delims=" %%i in ('dir /b /ad "%RootFolder%\%%a-%%b-%%c"') do (
    
16.             set /a "FolderN+=1"
    
17.         )
    
18.         if !FolderN! neq 0 (
    
19.             echo    情况[3] 两级子文件夹
    
20.         ) else (
    
21.             echo    情况[1] 正常待移动的子文件夹
    
22.         )
    
23.     )
    
24.     if not exist "%%a-%%b" (
    
25.         md "%%a-%%b"
    
26.     ) else if exist "%RootFolder%\%%a-%%b\%%a-%%b-%%c" (
    
27.         echo    情况[4] 父文件夹下存在同名文件夹 %RootFolder%\%%a-%%b\%%a-%%b-%%c
    
28.     ) else (
    
29.         move "%RootFolder%\%%a-%%b-%%c" "%RootFolder%\%%a-%%b"
    
30.     )
    
31. )
    
32. pause

复制代码