|
本帖最后由 chamlien 于 2014-8-19 20:34 编辑
#include <GUIConstantsEx.au3>
#include <WindowsConstants.au3>
#include <IE.au3>
$form = GUICreate("测试",350, 190)
$oIE = ObjCreate("Shell.Explorer.2")
GUICtrlCreateObj($oIE, -813, -187, 1500, 189)
$button1 = GUICtrlCreateButton("登录", 160, 123, 70, 28)
$ck2 = GUICtrlCreateButton("退出", 254, 123, 70, 28)
_IEnavigate($oIE,"http://192.168.168.248/portalReceiveAction.do?wlanuserip=172.21.3.15&wlanacname=amnoon");内网地址
GUISetState()
While 1
$msg = GUIGetMsg()
If $msg = $button1 Then
Local $oForm = _IEFormGetObjByName($oIE, "portalForm")
Local $oQuery = _IEFormElementGetObjByName($oForm, "userid")
_IEFormElementSetValue($oQuery,"test")
Local $oQuery = _IEFormElementGetObjByName($oForm, "passwd")
_IEFormElementSetValue($oQuery, "123456")
_IEFormSubmit($oForm)
EndIf
If $msg = $CK2 then
Exit
If $msg = -3 then
Exit
EndIf
WEnd
以上脚本点击登录会弹出如下窗口:
用论坛提供的汉化编辑器运行以上代码情况如下:
在win7系统下关闭这个弹窗后脚本仍然正常执行,但是在XP系统下,关闭这个弹窗后,脚本就不听使唤了,点击“退出”或关闭都没反应。
以上代码如果用官方编辑器运行,情况如下:
当出现这个弹窗,点击确定时,脚本就会立即错误并退出,错误代码:The requested action with this object has failed.
经过对比,我认为是这个弹窗让脚本出现了不稳定,谁能帮我解决这个问题吗?
(以上地址为内网) |
本帖子中包含更多资源
您需要 登录 才可以下载或查看,没有账号?加入
×
|