[已解决]批处理怎样随机抽取不同文件中的一段组成新文章？

clcavril

文件夹下有数篇不同的文章,数量不定, 都是形如xx.txt的,文件名长度不定

现在想随机从一个txt中抽取出1段  (以换行作为段落标志)可参考此帖; http://www.bathome.net/viewthrea ... ghlight=%2Bfanfande

随机抽取8个txt文件,得到8个段落,然后把这8个段落合并为一个新的txt,保存到articles文件夹下

下面是txt样本,有40个txt文件


http://u.115.com/file/aq36fy8h

先谢谢大家了

batman

1. 
   
2. @echo off&setlocal enabledelayedexpansion
   
3. if not exist articles md articles
   
4. for %%a in (*.txt) do set "_!random!_%%~na=%%a"
   
5. (for /f "tokens=2 delims==" %%a in ('set _') do (
   
6.   set /a n+=1
   
7.   if !n! leq 8 (
   
8.     setlocal
   
9.     for /f "usebackq delims=" %%b in ("%%a") do set /a m+=1&set ".!m!=%%b"
   
10.     set /a a=!random!%%!m!+1
    
11.     for %%b in (!a!) do echo !.%%b!
    
12.     endlocal
    
13.   )
    
14. ))>articles\new.txt
    

复制代码

clcavril

谢谢
验证可用