找回密码
 加入
搜索
查看: 2200|回复: 4

[系统综合] [已解决]如何退出这个程序的循环~!

[复制链接]
发表于 2012-4-27 13:24:41 | 显示全部楼层 |阅读模式
本帖最后由 xx44t10 于 2012-4-28 23:54 编辑
#include <WindowsConstants.au3>
#include <IE.au3>
$Form1 = GUICreate("内嵌IE",300, 200,400,400,$WS_POPUP, $WS_EX_TOOLWINDOW); *****注意窗口扩展样式*****   
$oIE = ObjCreate("Shell.Explorer.2");
GUICtrlCreateObj($oIE, -12, -17, 300, 200) ;对上面的对象设置大小
GUIRegisterMsg($WM_NCHITTEST, "WM_NCHITTEST") ;*****使窗口能移动*****
GUISetState(@SW_SHOW);显示gui
#EndRegion ### END Koda GUI section ### 
While 1 ;循环
        $oIE.navigate("http://www.2345.com")
        Sleep ("2000")
        js(FileRead("jquery-1.6.1.min.js"))
        js("$('#search1').val('歌词')")
        js("$('.sbutton').click()")
        Sleep(100)
        WinClose("百度搜索_歌词","")
        WinClose("百度搜索_歌词","")
        Sleep(100)
        WinClose("","google")
             WEnd;
exit
;*****
Func WM_NCHITTEST($hGui, $iMsg, $iwParam, $ilParam) 
        If ($hGui = $hGui) And ($iMsg = $WM_NCHITTEST) Then Return $HTCAPTION
EndFunc ;=>使窗口能移动函数
;*****


Func js($script)
        $oIE.document.parentWindow.execscript($script)
EndFunc
jquery-1.6.1.min.js的代码是:把au3后缀名改为js

如何退出这个循环.谢谢了

本帖子中包含更多资源

您需要 登录 才可以下载或查看,没有账号?加入

×
发表于 2012-4-27 15:55:03 | 显示全部楼层
回复 1# xx44t10

首先得问你:
      什么情况下退出循环? 循环运行一次? 2次?
      还是接到退出循环指令为止?
 楼主| 发表于 2012-4-27 23:40:25 | 显示全部楼层
回复 2# user3000        
循环一次怎么退出?
循环二次怎么退出?
应该怎么退出这个循环指令呢? 举个例吧.
发表于 2012-4-27 23:56:32 | 显示全部楼层
回复 3# xx44t10
都中级会员了, 这些入门级的问题应该要自己尝试并努力去解决了!
$count = 0
While 1
Sleep (100) ; 适当加延迟可降低CPU的占用率
$count += 1
msgbox(0, 'While 循环信息', '当前第 ' & $count & ' 次循环! ')
if $count = 2 then exitloop
wend

$count = 0
do
Sleep (100) ; 适当加延迟可降低CPU的占用率
$count += 1
msgbox(0, 'Do 循环信息', '当前第 ' & $count & ' 次循环! ')
until $count = 2

For $i = 1 to 2
 msgbox(0, 'For 循环信息', '当前第 ' & $count & ' 次循环! ')
next
 楼主| 发表于 2012-4-28 23:56:03 | 显示全部楼层
回复 4# user3000


    以前又不经常用au3 我是半桶水呀.看来我还是得努力学习啊..谢谢你了.
您需要登录后才可以回帖 登录 | 加入

本版积分规则

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

GMT+8, 2024-11-14 13:01 , Processed in 0.237465 second(s), 24 queries .

Powered by Discuz! X3.5 Licensed

© 2001-2024 Discuz! Team.

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