Board logo

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

作者: wyx567    时间: 2017-10-18 17:08     标题: 批处理怎么根据文件名中的字符串将多个文件移动到同一文件夹

怎么样让每5个文件移动到一个文件夹里

让文件夹内文件5个为一组移动到一个新文件夹里呢
作者: wyx567    时间: 2017-10-18 17:09

有几百个这样的文件
作者: Blitz    时间: 2017-10-18 18:22

本帖最后由 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
复制代码

作者: wyx567    时间: 2017-10-18 18:58

回复 3# Blitz

您好,运行后效果:
作者: wyx567    时间: 2017-10-18 19:03

文件夹不需要设置成这样,用简单的数字或者字母来做文件夹都行

非常感谢~
作者: slore    时间: 2017-10-18 19:28

其实按-分隔,取出中间40,41这种数字,按这个名字见文件夹存放就行吧,和5个没关系
作者: Blitz    时间: 2017-10-18 19:34

回复 4# wyx567


    请问那些由这个批处理创建的文件夹里有没有文件?
作者: wyx567    时间: 2017-10-18 19:52

回复 7# Blitz


  有,而且也是正确的文件~
作者: wyx567    时间: 2017-10-18 19:53

回复 6# slore


    这样也行,就是把每个人名相同的文件放一起就好
只是正好都是5个文件而已
作者: Blitz    时间: 2017-10-18 19:59

回复 8# wyx567


    那就是有一部分文件没有弄到咯,等晚上我再看看吧,现在不在电脑前
作者: wyx567    时间: 2017-10-18 20:54

回复 10# Blitz


    好的,麻烦您了
作者: Blitz    时间: 2017-10-18 23:44

本帖最后由 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
复制代码

作者: wyx567    时间: 2017-10-19 08:54

回复 12# Blitz

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

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

非常感谢!
作者: lifei259    时间: 2017-10-19 09:48

本帖最后由 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
复制代码

作者: Blitz    时间: 2017-10-19 10:25

本帖最后由 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
复制代码





欢迎光临 批处理之家 (http://bathome.net./) Powered by Discuz! 7.2