关于回放求助!
Sub MainDim Result As Integer
StartBrowser "http://10.120.20.1/frame/", "WindowTag=WEBBrowser"
Window SetContext, "WindowTag=WEBBrowser", ""
Window WMaximize, "", ""
Browser NewPage,"HTMLTitle=配电管理信息系统;Index=0",""
EditBox Click, "Name=tb_username", "Coords=35,10"
InputKeys "lu.sun"
'InputEncKeys "DAAAAFEAAAAEDrA/z9xPcEjNcg8="
HTMLImage Click, "Name=btn_login", "Coords=30,18"
Window SetContext, "Caption=配电MIS管理平台 - Microsoft Internet Explorer", "" Browser NewPage,"HTMLTitle=配电MIS管理平台;Index=0",""
HTML Click, "Type=HTMLTableCell;HTMLId=menuBar41000000", "Coords=40,10"
Browser SetFrame,"Type=HTMLFrame;HTMLId=subframe41000000",""
Browser NewPage,"",""
HTML Click, "Type=HTMLTableCell;HTMLId=menuBar41100000", "Coords=36,8"
Browser SetFrame,"Type=HTMLFrame;HTMLId=pdmismain",""
Browser NewPage,"HTMLTitle=EquipFiles_Work_Browse;Index=0",""
HTMLImage Click, "Type=HTMLImage;Name=ImageButton1", "Coords=34,8"
Browser NewPage,"HTMLTitle=EquipFiles_Work_AddWork;Index=0",""
ComboBox Click, "Type=ComboBox;Name=ddlCompany", ""
End Sub
高手看下,如上代码,执行到红色部分后,回放就停住了!类似的项目都有问题,即那种屏蔽了IE工具栏标题栏的系统,使用普通模式录制后回放都有问题,不动!
顶下!
求助各位!像那种将IE工具栏和标题栏屏蔽开发的系统,使用robot录制后回放时无法成功,刚一回放即停住了。这是需要安装什么插件补丁吗?是不是robot识别第三方插件不太好? Browser NewPage,"HTMLTitle=配电MIS管理平台;Index=0",""
把这一句注释掉试试.
另外可以给Window SetContext, "Caption=配电MIS管理平台 - Microsoft Internet Explorer", ""
改成通配符形式试试.这种应该不成问题的
感谢回复!
问题还是未解决...:(注掉了 Browser NewPage,"HTMLTitle=配电MIS管理平台;Index=0",""这句后,页面左下角的状态栏永远是正在打开页面状态,因此这句不该注掉,且即使注掉之后回放也是不动。
Window SetContext, "Caption=配电MIS管理平台 - Microsoft Internet Explorer", "" 这句话改成通配符是什么意思?能再说具体点吗:)
这种现象很奇怪,凡是屏蔽了IE工具栏和标题栏的系统,回放都会不动,其它系统都没问题,搞不清楚为什么。。。。。。
自己顶!
在线等高人! 加我MSN吧.....huiyouzhiwu@hotmail.com自己顶下!
我把代码再帖下,有经验的人事一起探讨下吧.这个问题确实很奇怪,屏蔽掉ie工具标题栏后回放,再简单的操作都不行.以下代码的操作为在打开的页面里分别输入两行字符,就这样一个简单的操作回放也不成功....
Sub Main
Window SetContext, "Caption=http://10.120.20.1 - 配电MIS管理平台 - Microsoft Internet Explorer", ""
Browser SetFrame,"Type=HTMLFrame;HTMLId=pdmismain;\;Type=HTMLFrame;HTMLId=mainframe",""
Browser NewPage,"HTMLTitle=MessageShow;Index=0",""
EditBox Click, "Type=EditBox;Name=TbOperator", "Coords=28,13"
InputKeys "11111"
Browser NewPage,"HTMLTitle=MessageShow;Index=0",""
EditBox Click, "Type=EditBox;Name=TbTitle", "Coords=22,8"
InputKeys "22222"
End Sub
单步调试:蓝色那行如果注掉后,红色那行再往下走,程序就自动跳出来结束了......
问题依然无法解决!
期待更多有经验人事回复!自己顶
自己再顶下!等高人!自己的想法
你试一试..在红色的脚本前面或后面...加上delayfor1000我在回放的时候也会遇到..这样的问题..回放停止..或是跳出...新手的小建议.可以试试..:loveliness:
'$Include "sqautil.sbh"
Sub Main
Dim Result As Integer
'Initially Recorded: 2008-7-1417:09:59
'Script Name: 测试
StartBrowser "http://127.0.0.1:8080/Register/welcome.html", "WindowTag=WEBBrowser"
Window SetContext, "WindowTag=WEBBrowser", ""
Window WMaximize, "", ""
Browser NewPage,"HTMLTitle=XXXXXXX;Index=0",""
EditBox Click, "Name=j_username", "Coords=26,15"
InputKeys "ming"
EditBox Click, "Name=j_password", "Coords=31,15"
InputEncKeys "BAAAAJEAAABUXuB7"
'点击登陆
PushButton Click, "Name=submit"
delayfor 1000
Browser SetFrame,"Type=HTMLFrame;HTMLId=menu",""
Browser NewPage,"HTMLTitle=;Index=0",""
HTMLLink Click, "Type=HTMLLink;Name=sub1", ""
HTMLLink Click, "Type=HTMLLink;Name=sub5", ""
HTMLLink Click, "Type=HTMLLink;Name=sub7", ""
Browser SetFrame,"Type=HTMLFrame;HTMLId=text",""
Browser NewPage,"HTMLTitle=无标题文档;Index=0",""
PushButton Click, "Type=PushButton;Name=Serch"
Browser NewPage,"HTMLTitle=无标题文档;Index=0",""
HTMLLink Click, "Type=HTMLLink;HTMLText=1000000000000131", ""
上面是我自己录的.希望你的问题可以解决..不知道能不能帮上你的忙..一起关注吧
感谢10楼的回复!
延时的问题我遇到过,也加过不同时间的延时,不过感觉这个好象不是这么简单的问题,据我问开发的人员,这个系统的架构有些特殊,以造成回放时与其它系统不一样。我去试下了,如果可以的就更好了呵呵! 呵呵 恩 期待问题被解决..解决之后 M我..呵呵 我也想了解下没问题的:)
我的msn:b46bigbird@eyou.com,有时间加!10楼的朋友在么还?
你说的加延时的问题没用的,我试过了呵呵,关键是执行到红色那行时就失败了,单步调试也是这个结果,到EditBox这行就失败跳出(应该是坐标问题,找不到位置了)。将Browser NewPage,"HTMLTitle=MessageShow;Index=0","" 这行注释掉后也是到EditBox这行失败,有经验的人事一起探讨吧。Window SetContext, "Caption=http://10.120.20.1 - 配电MIS管理平台 - Microsoft Internet Explorer", ""
Browser SetFrame,"Type=HTMLFrame;HTMLId=pdmismain;\;Type=HTMLFrame;HTMLId=mainframe",""
Browser NewPage,"HTMLTitle=MessageShow;Index=0",""
EditBox Click, "Type=EditBox;Name=TbOperator", "Coords=28,13"
回复 4# 的帖子
Window SetContext, "Caption=配电MIS管理平台 - Microsoft Internet Explorer", "" 这句话改成通配符是什么意思?能再说具体点吗:)你可以写成这类似这样的:Window SetContext, "Caption=配电**", ""
试下
感谢15楼的回复!
之前我试过改成这样:Window SetContext, "Caption={*}",""但是依然不成功,不知道是不是语法有问题。
按照你说的改成Window SetContext, "Caption=配电**","" 我明天再试下(现在在家,没环境呵呵),如果还是不行的话那应该还是这个系统自身的问题。这个系统使用的是一套自己开发的框架,好象是用来加载session,所以造成一个很普通的操作都无法回放。有经验的人事继续发表下自己的看法吧呵呵,如果此问题解决,我会告诉大家的:)
页:
[1]