|
本帖最后由 ldxhlx 于 2011-9-2 14:34 编辑
我想写个自动登陆办公自动化的脚本,具体有两步骤
一、自动输入帐号密码,然后登陆。
二、登陆后自动点击链接我的邮箱,进入邮件系统。
代码如下:
#include <IE.au3>
$oIE=_IECreate("http://192.168.1.12:8080/cas/login?service=")
WinWaitActive("办公自动化管理系统 - Microsoft Internet Explorer","http://192.168.1.12:8080/cas/login?service=")
$oForm=_IEFormGetObjByName($oIE,"login_form")
$oQuery=_IEFormElementGetObjByName($oForm,"username")
_IEFormElementSetValue($oQuery,"user")
$oQuery=_IEFormElementGetObjByName($oForm,"password")
_IEFormElementSetValue($oQuery,"111111")
_IEImgClick($oIE,"image/login/login1.jpg","src");模拟点击图片,登陆按钮是一个图片+onclick事件
_IELoadWait ($oIE)
$oframes=_IEFrameGetCollection($oIE,0)
_IELinkClickByText($oframes,"我的邮箱",0)
MsgBox(0,0,0)
问题:
执行到倒数第二行_IELinkClickByText($oframes,"我的邮箱",0)时卡住了,最后一行MsgBox(0,0,0)要过10来分钟才执行,在此期间SciTE编辑器中工具菜单位中只有停止执行可用,其他菜单项均为灰色,
找到一个变通方法,用_IELinkGetCollection 找出$oframes中所有链接,再用_IEAction点击需要的链接,用这种方式程序正常。
不知道用_IELinkClickByText函数时程序卡住了是什么原因,有哪位大侠可以帮忙解疑吗?? |
|