永发信息网

下面的程序利用AutoIt做自动化测试为什么总会出现错误,希望哪位大侠给知道知道看有没有什么语法错误:

答案:1  悬赏:80  手机版
解决时间 2021-11-20 08:14
下面的程序利用AutoIt做自动化测试为什么总会出现错误,希望哪位大侠给知道知道看有没有什么语法错误:
最佳答案
试修改如下:

$file = FileOpen("result.txt", 2) ;==> 这一句前面要加个变量

If $file = -1 Then
MsgBox(4096, "错误", "不能打开文件.")
Exit
EndIf

Dim $username[5] = ["111a2fe", "sw136", "a23eeeeeeeeee", "a233", "a134rt"]
Dim $password[5] = ["123567", "333aaae", "aaaaaaa", "dkdkdkdk", "dddddddd"]
Run("register.exe")
WinWaitActive("用户注册")
For $i = 0 To 4
$a = 0 ;==> 这句可以不要
ControlSend("用户注册", "", 5, $username[$i]) ;==> 注意控件ID是否正确
;GUICtrlSetData(5,$username[$i])
ControlSend("用户注册", "", 7, $password[$i]) ;==> 注意控件ID
;GUICtrlSetData(7,$password[$i])
ControlClick("用户注册", "", 8)
$a = WinGetState("错误信息")
ControlClick("错误信息", "", 2) ;==> 这一句貌似不应该写在这,据猜测,可能是注册失败才有这个窗口出现
;MsgBox(0,"aa",$a)
If $a <> 0 Then
WinWaitActive("错误信息")
ControlClick("错误信息", "", 2)
FileWrite($file, "用户名: " & $username[$i] & @CRLF & "密码:" & $password[$i] & @CRLF & "right" & @CRLF) ;==> 修改

;MsgBox(0,"bb",$a)
Else
WinWaitActive("注册成功")
ControlClick("注册成功", "", 2)
;MsgBox(0,"cc",$a)
EndIf
Next
我要举报
如以上问答信息为低俗、色情、不良、暴力、侵权、涉及违法等信息,可以点下面链接进行举报!
大家都在看
秦统一中国后推行“书同文”,秦始皇下令全国
智能手表 打电话为什么说停机
家长不懂钢琴怎么陪练
如何组织安全管理和风险预测预防
电脑内存怎么组双通道?怎么插内存条
泵车租金多少钱一个月
老人与海鸥 谈起海鸥,老人的眼睛立刻生动起来
宪秋干洗店地址在什么地方,想过去办事,
吴组词(多点)
宣传京剧广告词?
网上短期借款打条子的那种不还会怎样
英杰滑雪场怎么样 英杰滑雪场有什么好玩的
当车正常行驶时车哏了一下是什么情况
空中有一只小鸟.距水面3m,其正下方4m深处的
请问 租界 租借地和势力范围有什么区别
推荐资讯
海信电视21英寸的,在200年价格是多少
Atom(TM) CPU D410 @1.66GHz 1.67GHz 2GB内存
表白短语最温馨9字
全新农田插秧机哪有买
公司电话变成自动传真机怎么改为手动?
盘锦退休2017年涨多少工资,盘锦退休工资如何
建瓯东站到西站坐几路公交车
什么叶子能做香料做菜用
为什么炖鸭子的时候放黄豆鸭肉容易熟?
我的快玩欢乐农场2街机模式46关怎么才能玩过
updatemanager是什么东西?怎么卸载?
巴音布鲁克草原经217国道到喀那斯路线大概有
正方形一边上任一点到这个正方形两条对角线的
阴历怎么看 ?