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

[文本处理] 【已解决】批处理如何将多个文件夹按数量放在不同的文件夹里?

本帖最后由 先起个名 于 2023-8-9 15:12 编辑

求助大佬

比如我有105个文件夹,按照每20个一组,放在名字为1,2,3,4,5的文件夹里,剩下的5个就剩在原文件夹里即可
1

评分人数

    • Batcher: 感谢给帖子标题标注[已解决]字样PB + 2

本帖最后由 qixiaobin0715 于 2023-8-8 20:22 编辑

请不要预先创建文件夹1/2/3...,代码会在适当时候自动创建,否则会出现问题。
  1. @echo off
  2. set k=20
  3. setlocal enabledelayedexpansion
  4. for /f "delims=" %%i in ('dir /b /ad') do (
  5.     set /a n+=1
  6.     set _!n!=%%i
  7.     if !n! equ %k% (
  8.         set /a m+=1
  9.         md !m!
  10.         for /l %%j in (1,1,%k%) do move "!_%%j!" "!m!\"
  11.         set n=
  12.     )
  13. )
复制代码
1

评分人数

TOP

跪谢,跪谢,跪谢

TOP

回复 1# 先起个名
  1. @echo off
  2. set "MaxNum=20"
  3. cd /d "%~dp0"
  4. setlocal enabledelayedexpansion
  5. set "FolderCount=0"
  6. set "NewFolder=1"
  7. for /f "delims=" %%i in ('dir /b /ad') do (
  8.     if not exist "!NewFolder!" (
  9.         md "!NewFolder!"
  10.     )
  11.     set /a FolderCount+=1
  12.     move /y "%%i" "!NewFolder!"
  13.     if !FolderCount! equ !MaxNum! (
  14.         set /a NewFolder+=1
  15.         set "FolderCount=0"
  16.     )
  17. )
复制代码
我帮忙写的代码不需要付钱。如果一定要给,请在微信群或QQ群发给大家吧。
【微信公众号、微信群、QQ群】http://bbs.bathome.net/thread-3473-1-1.html
【支持批处理之家,加入VIP会员!】http://bbs.bathome.net/thread-67716-1-1.html

TOP

返回列表