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

TOP

本帖最后由 77七 于 2023-4-1 23:02 编辑
  1. @echo off
  2. setlocal enabledelayedexpansion
  3. for /f "delims=" %%i in ('dir /b /a-d *.mp3 *.m4a ^| find /c /v ""') do set c=%%i
  4. for /l %%l in (0,500,3500) do (
  5.         set m=000%%l
  6.         set /a k=%%l+499
  7.         set n=000!k!
  8.         if !k! geq !c! (
  9.                 set l=000!c!
  10.                 set "folder=!m:~-4!-!l:~-4!(完)"
  11.         ) else (
  12.                 set "folder=!m:~-4!-!n:~-4!"
  13.         )
  14.         md "!folder!"
  15.         for /f "delims=" %%i in ('dir /b /a-d *.mp3 *.m4a') do (
  16.                 if "%%~ni" leq "!n:~-4!" (
  17.                         move "%%i" "!folder!" 1>nul
  18.                 )
  19.         )
  20.         if defined l (
  21.                 goto :next
  22.         )
  23. )
  24. :next
  25. ren "0000-0499" "0001-0499"
复制代码
bat小白,请多指教!谢谢!

TOP

本帖最后由 qixiaobin0715 于 2023-4-4 09:27 编辑

这样应当也行,写的较乱,未仔细审核和测试,只是提供另外一种思路:
  1. @echo off
  2. for /f "delims=" %%i in ('dir /b /a-d^|find /c ".mp3 .m4v"') do set m1=%%i
  3. set m2=0
  4. set m3=4
  5. setlocal enabledelayedexpansion
  6. for /l %%i in (499,500,%m1%) do (
  7.     set n=%%i
  8.     set /a n1=%%i-499
  9.     set n1=000!n1!
  10.     set n2=000%%i
  11.     if %%i equ 499 (
  12.         set Folder=0001-0499
  13.     ) else (
  14.         set Folder=!n1:~-4!-!n2:~-4!
  15.     )
  16.     md "!Folder!"
  17.     for /l %%j in (!m2!,1,!m3!) do (
  18.         set x=0%%j
  19.         set y=%%j
  20.         move "!x:~-2!??.mp3" "!Folder!"
  21.         move "!x:~-2!??.m4v" "!Folder!"
  22.     )
  23.     set /a m2=y+1
  24.     set /a m3=m2+4
  25. )
  26. if !m1! equ !n! (
  27.     set /a n+=1
  28.     set n1=000!n!
  29.     set n2=000!m1!
  30.     set Folder=!n1:~-4!-!n2:~-4!(完)
  31.     md "!Folder!"
  32.     move "*mp3" "!Folder!"
  33.     move "*m4v" "!Folder!"
  34. ) else (
  35.     ren "!Folder!" "!Folder!(完)"
  36. )
  37. pause
复制代码
后来发现上述代码未考虑周全,错误较多,不必测试了。

TOP

回复 17# 77七


    这个可以,谢谢了

TOP

回复 16# xp3000


    好了,这次可以了,完美。谢谢大佬

TOP

本帖最后由 terse 于 2023-4-3 18:31 编辑

原来的代码理解错误。重写的是按文件名序号,移动到对应文件夹 不知结果是否符合
  1. @echo off&setlocal enabledelayedexpansion
  2. for /f "delims=" %%i in ('dir /b /a-d *.mp3 *.m4v^|find /v /c ""') do set /a n=%%i
  3. set /an+=10000,d=500,b=d-1
  4. if %n% gtr 10000 (
  5.    for /l %%i in (10000,!d!,!n!) do (
  6.         set /a "start=%%i,end=start+b,start+=^!(start-10000)"
  7.         if !end! geq !n! (
  8.            set old=!start:~-4!-!n:~-4!(完)
  9.         ) else  set old=!start:~-4!-!end:~-4!
  10.         set "_start=1!old:~,2!"
  11.         set "_end=1!old:~5,2!"
  12.         md "!old!" 2>nul
  13.         for /l %%j in  (!_start!,1,!_end!) do (
  14.              set s=%%j
  15.              move "!s:~1!*.mp3" "!old!" >nul 2>nul
  16.              move "!s:~1!*.m4v" "!old!" >nul 2>nul
  17.         )
  18.      )
  19. )
复制代码

TOP

本帖最后由 qixiaobin0715 于 2023-4-3 10:29 编辑

18楼写的匆忙,错误较多。结合本帖中各位大佬的思路,简化18楼的代码:
  1. @echo off
  2. for /f "delims=" %%i in ('dir /b /a-d *.mp3 *.m4v^|find /v /c ""') do set m=%%i
  3. set /a m1=100,m2=104
  4. set /a m+=10000
  5. setlocal enabledelayedexpansion
  6. for /l %%i in (10000,500,%m%) do (
  7.     set /a n1=%%i,n2=%%i+499
  8.     set Folder=!n1:~-4!-!n2:~-4!
  9.     md "!Folder!"
  10.     for /l %%j in (!m1!,1,!m2!) do (
  11.         set x=%%j
  12.         move "!x:~-2!*.mp3" "!Folder!">nul 2>nul
  13.         move "!x:~-2!*.m4v" "!Folder!">nul 2>nul
  14.     )
  15.     set /a m1=x+1,m2=m1+4
  16. )
  17. ren "!Folder!" "!Folder:~,5!!m:~1!(完)"
  18. ren "0000-0499" "0001-0499"
  19. pause
复制代码
bat另存为ANSI编码

TOP

回复 21# terse

大佬,我试了两段代码,第一个文件夹0001-0499都是移动了500个文件进去
bat小白,请多指教!谢谢!

TOP

本帖最后由 terse 于 2023-4-3 12:55 编辑

回复 23# 77七
重新翻看一下帖子
楼主的意思应该是按文件名MOVE到对应的文件夹  那样的话就开始就错了

TOP

返回列表