找回密码
 注册
搜索
[新手上路]批处理新手入门导读[视频教程]批处理基础视频教程[视频教程]VBS基础视频教程[批处理精品]批处理版照片整理器
[批处理精品]纯批处理备份&还原驱动[批处理精品]CMD命令50条不能说的秘密[在线下载]第三方命令行工具[在线帮助]VBScript / JScript 在线参考
查看: 17525|回复: 1

[文件操作] [分享]批处理移动子文件夹至父文件夹并提示不同情况

[复制链接]
发表于 2022-12-2 17:46:55 | 显示全部楼层 |阅读模式
如何把子文件夹剪切父文件夹层,子文件夹中文件跟着子文件夹,空文件夹、子文件夹中还有文件夹、同名文件夹做个提示

移动前:


移动后:
 楼主| 发表于 2022-12-2 17:47:21 | 显示全部楼层
【解决方案】

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 "delims=" %%a in ('dir /b /ad *-* ^| findstr /v ".*-.*-"') do (
  5.     echo 正在处理文件夹 %%a
  6.     for /f "delims=" %%b in ('dir /b /ad "%%a"') do (
  7.         echo    检查子文件夹 %%b
  8.         set "AllN=0"
  9.         set "FolderN=0"
  10.         for /f "delims=" %%c in ('dir /b "%%a\%%b"') do (
  11.             set /a "AllN+=1"
  12.         )
  13.         if !AllN! equ 0 (
  14.             echo        情况[2] "%%a\%%b" 是空文件夹
  15.         ) else (
  16.             for /f "delims=" %%c in ('dir /b /ad "%%a\%%b"') do (
  17.                 set /a "FolderN+=1"
  18.             )
  19.             if !FolderN! neq 0 (
  20.                 echo        情况[3] "%%a\%%b" 两级子文件夹
  21.             ) else (
  22.                 echo        情况[1] "%%a\%%b" 正常待移动的子文件夹
  23.             )
  24.         )
  25.         if not exist "%~dp0%%b" (
  26.             move "%%a\%%b" "%~dp0"
  27.         ) else (
  28.             echo        情况[4] 根目录存在同名文件夹 "%%b"
  29.         )
  30.     )
  31. )
  32. pause
复制代码
您需要登录后才可以回帖 登录 | 注册

本版积分规则

Archiver|手机版|小黑屋|批处理之家 ( 渝ICP备10000708号 )

GMT+8, 2026-3-19 09:23 , Processed in 0.018458 second(s), 8 queries , File On.

Powered by Discuz! X3.5

© 2001-2026 Discuz! Team.

快速回复 返回顶部 返回列表