|
4#
楼主 |
发表于 2005-11-9 13:34:35
|
只看该作者
我把代码贴上来,版主帮忙看看吧:
mark:call sqadatapoolfetch(dp)
call sqadatapoolvalue(dp,1,username)
Window SetContext, "Caption=SC社区 - 北京***信息技术有限公司 - Microsoft Internet Explorer", ""
EditBox dblClick, "Name=username", "Coords=29,11"
inputkeys username
call sqadatapoolvalue(dp,2,password)
EditBox Click, "Name=password", "Coords=20,12"
inputkeys password
HTMLImage Click, "Index=26", "Coords=43,13"
'输入的用户名、密码出错
if sqafindobject("Type=label;Caption=Microsoft Internet Explorer;Class=#32770") = sqasuccess then
Window SetContext, "Caption=Microsoft Internet Explorer", ""
'运行到这里
PushButton Click, "Text=确定"
goto mark
end if
'输入正确的用户名、密码
window CloseWin,"",""
startbrowser "http://www.***l.com.cn/scweb/logon.jsp","WindowTag=WEBBrowser"
window wmaximize,"currentwindow",""
goto mark
[ Last edited by taoyi_cheng on 2005-11-9 at 13:41 ] |
|