AutoIt 初探

关于AutoIt，算是接触不久，但是它以简单的方式访问Windows API，让人觉得轻松，初次试探，写个小小的脚本。UI测试，测试Windows自带的计算器。

 

示例如下：

 

 Main() Func Main() $modeName = "计算器" $modeExe = "calc.exe" Init($modeName, $modeExe) ; 有多个案例时，这里改为循环 $result1 = TestCase1($modeName) SaveResult($result1, "案例1") Fini($modeName, $modeExe) EndFunc ; 保存测试结果 Func SaveResult($bResult, $info) If $bResult Then MsgBox(64, "测试进度", StringFormat("测试通过(%s)", $info)) Else MsgBox(48, "测试进度", StringFormat("测试未通过(%s)", $info)) EndIf EndFunc ; 初始化环境 Func Init($modeName, $modeExe) Run($modeExe) WinWaitActive($modeName) EndFunc ; 测试案例1 Func TestCase1($modeName) Const $val1 = 1 Const $val2 = 5 Const $succ = 6 Send($val1) Send("+{=}") Send($val2) Send("=") Sleep(200); $result = ControlGetText($modeName, "", "Edit1") Return ($val1 + $val2) == Number($result) EndFunc ; 扫尾工作 Func Fini($modeName, $modeExe) MsgBox(0, "测试进度", "测试完毕") WinClose($modeName) EndFunc

 

关于autoit的api，参考http://www.dreams8.com/autoit/