论坛 › 『 提问交流 』 › 循环问题！！急~~

36158130 发表于 2009-7-1 18:29:01

循环问题！！急~~

Sleep("2000")
#include<IE.au3>
$oIE = _IECreate("192.168.1.1")
Sleep("800")
WinWaitActive("Configuration - 360安全浏览器")
Send("admin")
Sleep("200")
WinWaitActive("Configuration - 360安全浏览器")
send("{Tab}")
Sleep("200")
WinWaitActive("Configuration - 360安全浏览器")
send("123")
Sleep("200")
$oIE.document.forms.item.elements.item ("Login").click
WinWaitActive("Configuration - 360安全浏览器")
Sleep("1000")
#include<IE.au3>
$oIE1 = _IECreate("http://192.168.1.1/cgi-bin/ccgi?pageID=27")
_IELoadWait($oIE1)

$Input = _IEGetObjByID($oIE1, "idSubmit")
$Input.value = "Submit"

$OK = _IEGetObjByID($oIE1, "idSubmit")
$OK.click


将这个程序循环，
而且能统计循环次数的。
怎么样做到呢？？？
多谢位大哥指点指点

ceoguang 发表于 2009-7-1 18:52:48

#include<IE.au3>
$i = 0
While 1
        $i += 1
        Sleep("2000")
        $oIE = _IECreate("192.168.1.1")
        Sleep("800")
        WinWaitActive("Configuration - 360安全浏览器")
        Send("admin")
        Sleep("200")
        WinWaitActive("Configuration - 360安全浏览器")
        send("{Tab}")
        Sleep("200")
        WinWaitActive("Configuration - 360安全浏览器")
        send("123")
        Sleep("200")
        $oIE.document.forms.item.elements.item("Login" ).click
        WinWaitActive("Configuration - 360安全浏览器")
        Sleep("1000")
        $oIE1 = _IECreate("http://192.168.1.1/cgi-bin/ccgi?pageID=27")
        _IELoadWait($oIE1)
        $Input = _IEGetObjByID($oIE1, "idSubmit")
        $Input.value = "Submit"
        $OK = _IEGetObjByID($oIE1, "idSubmit")
        $OK.click
        MsgBox(, "", "循环次数: " & $i)
WEnd

36158130 发表于 2009-7-1 19:08:55

谢谢
怎么把提示框的“确定”按钮却掉呢
而且还要显示电脑当前的时间
一切的提示都在一个提示框内。。
能做到吗？

查看完整版本: 循环问题！！急~~