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

[文件操作] 批处理怎么根据文件名中的字符串将多个文件移动到同一文件夹

[复制链接]
发表于 2017-10-18 17:08:57 | 显示全部楼层 |阅读模式
怎么样让每5个文件移动到一个文件夹里

让文件夹内文件5个为一组移动到一个新文件夹里呢
 楼主| 发表于 2017-10-18 17:09:27 | 显示全部楼层
有几百个这样的文件
发表于 2017-10-18 18:22:50 | 显示全部楼层
本帖最后由 Blitz 于 2017-10-18 18:26 编辑

使用前先备份好自己的文件,以免造成损失
  1. @echo off
  2. for /f "tokens=2,3 delims=-" %%a in ('dir *.doc /b') do echo %%a-%%b>>mulu
  3. for /f "delims=" %%i in (mulu) do if not defined %%i set %%i=A & echo %%i>>xmulu
  4. del mulu
  5. for /f "delims=" %%n in (xmulu) do md %%n
  6. del xmulu
  7. for /f "tokens=1-4 delims=-" %%f in ('dir *.doc /b') do move "%%f-%%g-%%h-%%i" "%%g-%%h"
  8. pause
复制代码
 楼主| 发表于 2017-10-18 18:58:55 | 显示全部楼层
回复 3# Blitz

您好,运行后效果:
 楼主| 发表于 2017-10-18 19:03:10 | 显示全部楼层
文件夹不需要设置成这样,用简单的数字或者字母来做文件夹都行

非常感谢~
发表于 2017-10-18 19:28:35 | 显示全部楼层
其实按-分隔,取出中间40,41这种数字,按这个名字见文件夹存放就行吧,和5个没关系
发表于 2017-10-18 19:34:37 | 显示全部楼层
回复 4# wyx567


    请问那些由这个批处理创建的文件夹里有没有文件?
 楼主| 发表于 2017-10-18 19:52:04 | 显示全部楼层
回复 7# Blitz


  有,而且也是正确的文件~
 楼主| 发表于 2017-10-18 19:53:24 | 显示全部楼层
回复 6# slore


    这样也行,就是把每个人名相同的文件放一起就好
只是正好都是5个文件而已
发表于 2017-10-18 19:59:57 | 显示全部楼层
回复 8# wyx567


    那就是有一部分文件没有弄到咯,等晚上我再看看吧,现在不在电脑前
 楼主| 发表于 2017-10-18 20:54:14 | 显示全部楼层
回复 10# Blitz


    好的,麻烦您了
发表于 2017-10-18 23:44:47 | 显示全部楼层
本帖最后由 Blitz 于 2017-10-19 07:46 编辑

回复 11# wyx567


   应该可以了
  1. @echo off&setlocal enabledelayedexpansion
  2. for /f %%a in ('dir *.doc *.dot /b') do (
  3.         set wj=%%~na
  4.         set wjm=!wj:-=.!
  5.         echo !wjm!>>mulu
  6. )
  7. for /f %%b in (mulu) do (
  8.         set wj=%%~nb
  9.         echo !wj!>>xmulu
  10. )
  11. del mulu
  12. for /f %%c in (xmulu) do (
  13.         set wj=%%~xc
  14.         echo !wj:.=!>>cmulu
  15. )
  16. del xmulu
  17. for /f "delims=" %%i in (cmulu) do if not defined %%i set %%i=A & echo %%i>>dmulu
  18. del cmulu
  19. for /f "delims=" %%n in (dmulu) do md %%n
  20. for /f "delims=" %%d in (dmulu) do (
  21.         for /f "delims=" %%e in ('dir *.doc *.dot /b^|find "%%d"') do (
  22.                 move "%%e" "%%d"
  23.                 )
  24. )
  25. del dmulu
  26. pause
复制代码
 楼主| 发表于 2017-10-19 08:54:40 | 显示全部楼层
回复 12# Blitz

您好,测试了,还是有文件没划进去,
文件夹里有的还剩下几个文件没进去,14文件夹进去了6个文件

剩下的文件我手工弄了,还是非常感谢您
如果您有兴趣有空再编辑答案,我留了文件可以继续测试

非常感谢!
发表于 2017-10-19 09:48:38 | 显示全部楼层
本帖最后由 lifei259 于 2017-10-20 17:04 编辑
  1. @echo off
  2. for /f "tokens=1-4 delims=-." %%a in ('dir /b /a-d *.do*') do (
  3. if not exist "%%c" md "%%c"
  4. move "%%a-%%b-%%c*" "%%c"
  5. )
  6. pause

复制代码
发表于 2017-10-19 10:25:24 | 显示全部楼层
本帖最后由 Blitz 于 2017-10-19 10:27 编辑

回复 13# wyx567


    再看看这样会不会好一点,14那个文件夹里进了6个应该是这6个文件名有一处是相同的吧,主要是这些文件的命名不统一。。。
  1. @echo off&setlocal enabledelayedexpansion
  2. for /f %%a in ('dir *.doc *.docx *.dot /b') do (
  3.         set wj=%%~na
  4.         set wjm=!wj:-=.!
  5.         echo !wjm!>>mulu
  6. )
  7. for /f %%b in (mulu) do (
  8.         set wj=%%~nb
  9.         echo !wj!>>xmulu
  10. )
  11. del mulu
  12. for /f %%c in (xmulu) do (
  13.         set wj=%%~xc
  14.         echo !wj:.=!>>cmulu
  15. )
  16. del xmulu
  17. for /f "delims=" %%i in (cmulu) do if not defined %%i set %%i=A & echo %%i>>dmulu
  18. del cmulu
  19. for /f "delims=" %%n in (dmulu) do md %%n
  20. for /f "delims=" %%d in (dmulu) do (
  21.         for /f "delims=" %%e in ('dir *.doc *.docx *.dot /b^|find "%%d"') do (
  22.                 move "%%e" "%%d"
  23.                 )
  24. )
  25. del dmulu
  26. pause
复制代码
您需要登录后才可以回帖 登录 | 注册

本版积分规则

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

GMT+8, 2026-3-20 00:50 , Processed in 0.027033 second(s), 8 queries , File On.

Powered by Discuz! X3.5

© 2001-2026 Discuz! Team.

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