找回密码
 加入
搜索
查看: 2060|回复: 5

如何同时打开多个链接(我重新表达一下)

[复制链接]
发表于 2008-11-12 02:57:38 | 显示全部楼层 |阅读模式
如果循环打开记事本中的多个链接如何设置呀 不用输密码 输入用户名 点登陆即可

记事本有多个连接 每个连接是个网站 每个网站是个注册页 有一个输入框 可以输入用户名 然后提交  如果有几百个网站   怎样设置下时间

[ 本帖最后由 xptool 于 2008-11-15 05:33 编辑 ]
发表于 2008-11-12 03:17:27 | 显示全部楼层
有些提问,我总是看不明白。
发表于 2008-11-12 14:34:19 | 显示全部楼层
#include <IE.au3>

$file = FileOpen ("123.txt",0);按行循环读取文本
    If $file <> -1 Then
        While 1
         $line_txt = FileReadLine($file)
         If @error = -1 Then ExitLoop
                        if $line_txt <> "" Then
                        _IECreate($line_txt,0,1,0,-1)   
                        EndIf
                 Wend
    EndIf
FileClose($file)       

123.TXT
一行一个连接,小子 连接多了小心死机
 楼主| 发表于 2008-11-14 13:45:31 | 显示全部楼层
感谢HRO123

记事本有多个连接 每个连接是个网站 每个网站是个注册页 有一个输入框 可以输入用户名 然后提交  如果有几百个网站   怎样设置下时间
 楼主| 发表于 2008-11-14 23:26:10 | 显示全部楼层
网页都是这样的http://www.8euromail.nl/pages/confirm.php

输入邮箱

点下面按钮提交

网页显示确认
有 200多个这样的链接

我想每个2秒注册一个  链接都在同路径的记事本里 AUTOIT如何实现
发表于 2008-11-15 08:40:19 | 显示全部楼层

代码给出

#include <IE.au3>
#include <File.au3>
$Mail = "xxxx@xxx.com"  ;这里改成你的邮箱地址
$List = @ScriptDir&"\列表.txt" ;这个是网址的那个路径,文本文件里面 一行一个.
$Line = _FileCountLines($List)
$oIE = _IECreate()
For $i = 1 To $Line
        $Url = FileReadLine($List,$i)
        _IENavigate($oIE,$Url)
        $oUser = _IEGetObjByName($oIE,"userform[email]")
        _IEFormElementSetValue($oUser,$Mail)
        $oSubmit = _IEGetObjByName($oIE,"submit")
        _IEAction($oSubmit,"click")
Next
您需要登录后才可以回帖 登录 | 加入

本版积分规则

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

GMT+8, 2024-5-10 19:27 , Processed in 0.075654 second(s), 19 queries .

Powered by Discuz! X3.5 Licensed

© 2001-2024 Discuz! Team.

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