找回密码
 加入
搜索
查看: 2787|回复: 6

[AU3基础] txt文本随机输出问题(已解决)

  [复制链接]
发表于 2010-11-26 17:38:45 | 显示全部楼层 |阅读模式
本帖最后由 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文本内容输出

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

麻烦高手修改一下

评分

参与人数 1金钱 +10 收起 理由
afan + 10 感谢主动将修改帖子分类为[已解决],请继续 ...

查看全部评分

 楼主| 发表于 2010-11-26 18:30:56 | 显示全部楼层
已经解决了

$line = _FileCountLines("文本.txt")
$Word = FileReadLine("文本.txt",Random(1,$line,1))
send($Word)
发表于 2010-11-26 18:48:55 | 显示全部楼层
这样随机重复率很高的。
 楼主| 发表于 2010-11-26 18:58:11 | 显示全部楼层
那应该怎样输出才不高呢???
发表于 2010-11-27 09:42:34 | 显示全部楼层
解决了就请改标题
 楼主| 发表于 2010-11-27 15:49:36 | 显示全部楼层
那应该怎样随机输出重复率才不高呢???
发表于 2010-11-27 16:23:58 | 显示全部楼层
关健字要多,重复率就不高,不过楼上的兄弟,你要搞搜索作弊就要自己定义几十万个关健字。
还有,你研究也是浪费时间,人家搜索引擎早就想过你会玩这手了。
不怕封号封IP你就试试看
您需要登录后才可以回帖 登录 | 加入

本版积分规则

QQ|手机版|小黑屋|AUTOIT CN ( 鲁ICP备19019924号-1 )谷歌 百度

GMT+8, 2024-12-22 22:34 , Processed in 0.086198 second(s), 27 queries .

Powered by Discuz! X3.5 Licensed

© 2001-2024 Discuz! Team.

快速回复 返回顶部 返回列表