找回密码
 加入
搜索
查看: 1325|回复: 3

菜鸟提问 关于循环嵌套[已解决]

[复制链接]
发表于 2009-5-21 23:54:59 | 显示全部楼层 |阅读模式
本帖最后由 iwantcloth 于 2009-5-30 22:44 编辑

本人非计算机专业、无任何编程基础、接触AUTOIT不超过5天,属于菜中之菜,见谅

今天在制作一个网页表单自动化脚本(其实是一个选课外挂)的时候发生了些问题,寻帮助、百度无果,特来请教
脚本如下

dim $oForm,$oIE,$oQuery,$op,$p,$w
Dim $xkdm[6]

$xkdm[0]=1872
$xkdm[1]=1969
$xkdm[2]=1032
$xkdm[3]=1982
$xkdm[4]=1700
$xkdm[5]=1380
---------------------------------------------------------
#include <IE.au3>
$oIE = _IECreate ("http://xk.peizheng.net.cn/(adq33u45ct4top45yrtrbamr)/WebForm1.aspx")
$oForm = _IEFormGetObjByName ($oIE, "WebForm1")
$oQuery = _IEFormElementGetObjByName ($oForm, "TextBox1")
_IEFormElementSetValue ($oQuery, "某师妹学号")
$oQuery = _IEFormElementGetObjByName ($oForm, "TextBox2")
_IEFormElementSetValue ($oQuery, "某密码")
$oQuery = _IEFormElementGetObjByName ($oForm, "Button2")
_IEAction($oQuery ,"click")
sleep(200)
for $op=0 to 5
$oForm = _IEFormGetObjByName ($oIE, "WebForm7_1")
$oQuery = _IEFormElementGetObjByName ($oForm, "TextBox1")
_IEFormElementSetValue ($oQuery, $xkdm[$op])
$oQuery = _IEFormElementGetObjByName ($oForm, "Button1")
_IEAction($oQuery ,"click")
sleep(500)
Next
Sleep(300)
$oForm = _IEFormGetObjByName ($oIE, "WebForm7_1")
$oQuery = _IEFormElementGetObjByName ($oForm, "Buttonsub3a")
_IEAction($oQuery ,"click")
--------------------------------------------------------

是这样的,我希望在--------------线之间设置循环,已尝试过while,for next,do until,运行后都提示没有匹配的结束语,很不解,另外一个问题是,请问有没有方法判断_IEAction($oQuery ,"click")代码运行后数据是否成功发送,由于是菜鸟,刚才的陈述可能不够专业,请各位高手见谅。
 楼主| 发表于 2009-5-21 23:57:09 | 显示全部楼层
本帖最后由 iwantcloth 于 2009-5-21 23:59 编辑

以上脚本在运行的时候,除了由于不知道怎么判断提交是否成功发送而设置了的延时有时会出错之外,还算正常,但在--------加入循环后就出错了,不知道这样陈述有没有什么纰漏,由于学校要断网,可能要等到明晚才可能上网,如果不能及时反馈,请原谅我~~我一定会尽快回来的~谢谢各位了
发表于 2009-7-22 01:51:24 | 显示全部楼层
如果登录成功一般网页有提示的
读取源码然后StringInStr 检测一下
直至符合再继续下一个登录
发表于 2009-7-31 12:12:47 | 显示全部楼层
我用au3之前都是用按键精灵,用按键精灵之前都是用Toggle Mouse。。汗自己,从Toggle Mouse到au3经过了6年修炼时间。。
您需要登录后才可以回帖 登录 | 加入

本版积分规则

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

GMT+8, 2024-5-2 09:30 , Processed in 0.077045 second(s), 20 queries .

Powered by Discuz! X3.5 Licensed

© 2001-2024 Discuz! Team.

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