xymc 发表于 2010-11-26 17:38:45

txt文本随机输出问题(已解决)

本帖最后由 xymc 于 2010-11-27 12:53 编辑

#include<IE.au3>
$file = FileOpen("文本.txt", 0)
While 1
$oIE=_IECreate("www.baidu.com",0,1,1,0)
   $value = FileReadLine($file)
    If @error = -1 Then ExitLoop
send($value)
WEnd
FileClose("文本.txt")

这样是按顺序提取txt文本内容输出

怎样修改能做到随机输出???

麻烦高手修改一下

xymc 发表于 2010-11-26 18:30:56

已经解决了

$line = _FileCountLines("文本.txt")
$Word = FileReadLine("文本.txt",Random(1,$line,1))
send($Word)

yxiaopeng 发表于 2010-11-26 18:48:55

这样随机重复率很高的。

xymc 发表于 2010-11-26 18:58:11

那应该怎样输出才不高呢？？？

White 发表于 2010-11-27 09:42:34

解决了就请改标题

xymc 发表于 2010-11-27 15:49:36

那应该怎样随机输出重复率才不高呢？？？

kood481748 发表于 2010-11-27 16:23:58

关健字要多，重复率就不高，不过楼上的兄弟，你要搞搜索作弊就要自己定义几十万个关健字。
还有，你研究也是浪费时间，人家搜索引擎早就想过你会玩这手了。
不怕封号封IP你就试试看
页: [1]
查看完整版本: txt文本随机输出问题(已解决)