批处理如何把多个文本按指定数量分到多个文件夹里？

55075138

比如现有10000个文本文件，想move到编号是1--1000的文件夹内，这些文件夹处于同个目录，每个文件夹放10个文本。
还请各位大神指教下

55075138

文本名字也是有规律的，从1到10000

rdctgvf

：）

1. @echo off&setlocal enabledelayedexpansion
   
2. 
   
3. for /f "delims=" %%i in ("%cd%") do set FolderPath=%%i
   
4. 
   
5. for /f "delims=" %%a in ('dir /b /a:d') do (   
   
6.    set FoderName=%%a
   
7.    call :Loop !FoderName!
   
8. )
   
9. 
   
10. echo;&echo *** 脚本执行完毕 ***
    
11. pause
    
12. 
    
13. :Loop
    
14. set ddq=0
    
15. for /f "delims=" %%a in ('dir /b /a-d *.txt') do (
    
16.     set/a ddq+=1
    
17.     set FileName=%%a
    
18.     if !ddq! LEQ 10 (
    
19.                       move %FolderPath%\!FileName!  %FolderPath%\%1\!FileName!
    
20. 
    
21. ))
    
22. goto :eof
    
23. 
    

复制代码

代码在WIN7下测试完成，请把脚本放在所需处理的目录下执行并保证所处理的文本文件和文件夹在同一个目录

terse

文件名有规律的话 这样效率高点哦

1. @echo off&setlocal enabledelayedexpansion
   
2. set n=0
   
3. for /l %%i in (0,10,9990) do (
   
4.     set /a m=%%i,i=%%i/10+1,n+=10
   
5.     md !i! 2>nul
   
6.     if defined a (set "f=!m:~,-1!") else set "f=!m:~1!"
   
7.     move !f!?.txt !i!\ >nul 2>nul
   
8.     move !n!.txt !i!\ >nul 2>nul
   
9.     set a=0
   
10. )
    
11. pause

复制代码