[新手上路]批处理新手入门导读[视频教程]批处理基础视频教程[视频教程]VBS基础视频教程[批处理精品]批处理版照片整理器
[批处理精品]纯批处理备份&还原驱动[批处理精品]CMD命令50条不能说的秘密[在线下载]第三方命令行工具[在线帮助]VBScript / JScript 在线参考
返回列表 发帖

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

如何把子文件夹剪切父文件夹层,子文件夹中文件跟着子文件夹,空文件夹、子文件夹中还有文件夹、同名文件夹做个提示

移动前:


移动后:
我帮忙写的代码不需要付钱。如果一定要给,请在微信群或QQ群发给大家吧。
【微信公众号、微信群、QQ群】http://bbs.bathome.net/thread-3473-1-1.html
【支持批处理之家,加入VIP会员!】http://bbs.bathome.net/thread-67716-1-1.html

【解决方案】

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
复制代码
我帮忙写的代码不需要付钱。如果一定要给,请在微信群或QQ群发给大家吧。
【微信公众号、微信群、QQ群】http://bbs.bathome.net/thread-3473-1-1.html
【支持批处理之家,加入VIP会员!】http://bbs.bathome.net/thread-67716-1-1.html

TOP

返回列表