标题: [文本处理] 批处理怎样从文本里随机选取20行文本组成一个新文件？ [打印本页]
作者: 呵呵丶很无聊 时间: 2023-4-12 17:04 标题: 批处理怎样从文本里随机选取20行文本组成一个新文件？
有个问题需要处理，一个50行的文本文件，从里面随机选取20行文本组成一个新文件，该如何处理，求助！！！
问题描述：
先有一个50行的文本文件，想要从中随机选取20行，组成一个新的文本文件。求助大神！！！！
1.随机挑选指定数量的行文本。
2.挑选的行的内容（该行原来的文字顺序）不变。
3.可自定义随机选取的行的数量（不是不指定行）。
作者: Batcher 时间: 2023-4-12 17:42
回复 1# 呵呵丶很无聊
自定义随机选取的行的数量大于50的时候，希望得到什么结果？
作者: jyswjjgdwtdtj 时间: 2023-4-12 19:02
- var fso=new ActiveXObject("scripting.filesystemobject")
- var ftext=[]
- var f=fso.OpenTextFile("1.txt",1)
- while(!f.AtEndOfStream){
- ftext.push(f.ReadLine())
- }
- var newstr=''
- for(var i=0;i<20;i++){
- r=Math.floor(Math.random()*(50-i))
- newstr+=ftext[r]+"\n"
- ftext[r]=ftext[50-i]
- }
- var f=fso.CreateTextFile("2.txt")
- f.Write(newstr)
- f.close
保存为js文件
把输入文件保存为同一文件夹下的1.txt
作者: ly88888 时间: 2023-12-17 10:36
回复 3# jyswjjgdwtdtj
感谢大佬，拿走了，谢谢
| 欢迎光临 批处理之家 (http://bbs.bathome.net/) |
Powered by Discuz! 7.2 |