请教:QTP是否录制不了使用回车键查询的功能?
如图示:须先输入证号,按enter 后显示人员信息,然后才能录入其它操作。但回放后出错,无法查询到人员信息。
请问如何解决呢?
[ 本帖最后由 晶晶 于 2006-1-26 11:03 编辑 ] 你的问题描述不清!
首先,回车是可以被录制的。
其次,从截图上看,登陆界面应该有几个必填项目,不知道你是否都填写了。
最后,WEB的反应时间不是立即的。可能是由于延时所引起的。加上个等待函数或其它的什么应该就可以了。
要是再不行,那就靠运气吧。 加wait应该可以解决你的问题
wait(5) 加了等待函数还是不起作用 你在weblist中增加的项目是否是d1003,如果这个项目是动态的,可能会识别不了,最好是能提供出你录制的脚本,方便各位给你提供详细的帮助 Browser("系统登录").Page("系统登录").Image("space").Click
Browser("系统登录").Page("贵阳市新型农村合作医疗信息管理系统").Frame("left").Image("menu_02").Click
Browser("系统登录").Page("贵阳市新型农村合作医疗信息管理系统").Frame("left").Link("补偿管理").Click
Browser("系统登录").Page("贵阳市新型农村合作医疗信息管理系统").Frame("main").WebEdit("ylzh").Set "d1003"
Browser("系统登录").Page("贵阳市新型农村合作医疗信息管理系统").Frame("main").WebEdit("ylzh").Submit
wait(10)
Browser("系统登录").Page("贵阳市新型农村合作医疗信息管理系统").Frame("main_2").WebList("personoid").Select "d1003"
Browser("系统登录").Page("贵阳市新型农村合作医疗信息管理系统").Frame("main_2").WebList("typeoid").Select "1|门诊"
Browser("系统登录").Page("贵阳市新型农村合作医疗信息管理系统").Frame("main_2").WebList("typeoid").Select "2|普通门诊"
Browser("系统登录").Page("贵阳市新型农村合作医疗信息管理系统").Frame("main_2").WebList("typeoid").Select "3|体格检查"
Browser("系统登录").Page("贵阳市新型农村合作医疗信息管理系统").Frame("main_2").WebList("typeoid").Select "4|预防接种"
Browser("系统登录").Page("贵阳市新型农村合作医疗信息管理系统").Frame("main_2").WebList("typeoid").Select "5|门诊特殊疾病补偿"
Browser("系统登录").Page("贵阳市新型农村合作医疗信息管理系统").Frame("main_2").WebList("typeoid").Select "6|其他"
Browser("系统登录").Page("贵阳市新型农村合作医疗信息管理系统").Frame("main_2").WebList("typeoid").Select "7|住院"
Browser("系统登录").Page("贵阳市新型农村合作医疗信息管理系统").Frame("main_2").WebEdit("hospitalEdit").Set "001|乡镇卫生院"
Browser("系统登录").Page("贵阳市新型农村合作医疗信息管理系统").Frame("main_2").WebEdit("amount").Set "5000"
Browser("系统登录").Page("贵阳市新型农村合作医疗信息管理系统").Frame("main_2").WebEdit("invoiceNo").Set "1004"
Browser("系统登录").Page("贵阳市新型农村合作医疗信息管理系统").Frame("main_2").WebEdit("invoiceNo").Submit
Browser("系统登录").Page("贵阳市新型农村合作医疗信息管理系统").Frame("main_2").WebList("typeoid").Submit
Browser("系统登录").Page("贵阳市新型农村合作医疗信息管理系统").Frame("main_2").WebList("personoid").Submit
Browser("系统登录").Page("贵阳市新型农村合作医疗信息管理系统").Frame("main_2").WebEdit("amount").Submit
Browser("系统登录").Page("贵阳市新型农村合作医疗信息管理系统").Frame("main_2").WebEdit("hospitalEdit").Submit
Browser("系统登录").Page("贵阳市新型农村合作医疗信息管理系统").Frame("main_2").WebEdit("cdate").Set "20050203"
Browser("系统登录").Page("贵阳市新型农村合作医疗信息管理系统").Frame("main_2").WebEdit("diseaseTypeEdit").Set "A|传染病计"
Browser("系统登录").Page("贵阳市新型农村合作医疗信息管理系统").Frame("main_2").WebEdit("beginDate").Set "20050101"
Browser("系统登录").Page("贵阳市新型农村合作医疗信息管理系统").Frame("main_2").WebEdit("enddate").Set "20050206"
Browser("系统登录").Page("贵阳市新型农村合作医疗信息管理系统").Frame("main_2").WebButton("确 定").Click
Browser("系统登录").Page("贵阳市新型农村合作医疗信息管理系统").Frame("main_2").WebList("treatmentFeeTypeList").Select "M|门诊"
Browser("系统登录").Page("贵阳市新型农村合作医疗信息管理系统").Frame("main_2").WebList("treatmentFeeTypeList").Select "M001|挂号费"
Browser("系统登录").Page("贵阳市新型农村合作医疗信息管理系统").Frame("main_2").WebList("treatmentFeeTypeList").Select "M002|门诊检查费"
Browser("系统登录").Page("贵阳市新型农村合作医疗信息管理系统").Frame("main_2").WebList("treatmentFeeTypeList").Select "M003|门诊输液费"
Browser("系统登录").Page("贵阳市新型农村合作医疗信息管理系统").Frame("main_2").WebList("treatmentFeeTypeList").Select "M004|门诊诊疗费"
Browser("系统登录").Page("贵阳市新型农村合作医疗信息管理系统").Frame("main_2").WebList("treatmentFeeTypeList").Select "M005|门诊治疗费"
Browser("系统登录").Page("贵阳市新型农村合作医疗信息管理系统").Frame("main_2").WebList("treatmentFeeTypeList").Select "M009|门诊输血费"
Browser("系统登录").Page("贵阳市新型农村合作医疗信息管理系统").Frame("main_2").WebList("treatmentFeeTypeList").Select "M010|门诊其它费"
Browser("系统登录").Page("贵阳市新型农村合作医疗信息管理系统").Frame("main_2").WebList("treatmentFeeTypeList").Select "Z|住院"
Browser("系统登录").Page("贵阳市新型农村合作医疗信息管理系统").Frame("main_2").WebList("treatmentFeeTypeList").Select "Z001|床位费"
Browser("系统登录").Page("贵阳市新型农村合作医疗信息管理系统").Frame("main_2").WebList("treatmentFeeTypeList").Select "Z002|护理费"
Browser("系统登录").Page("贵阳市新型农村合作医疗信息管理系统").Frame("main_2").WebEdit("invoiceItemAmount").Set "5000"
Browser("系统登录").Page("贵阳市新型农村合作医疗信息管理系统").Frame("main_2").WebButton("确 定_2").Click
Browser("系统登录").Page("贵阳市新型农村合作医疗信息管理系统").Frame("main_2").WebButton("保 存").Click
Browser("系统登录").Page("贵阳市新型农村合作医疗信息管理系统").Frame("main_3").WebButton("计算金额").Click
Browser("系统登录").Page("贵阳市新型农村合作医疗信息管理系统").Frame("main_4").WebButton("确认补偿").Click
Browser("系统登录").Page("贵阳市新型农村合作医疗信息管理系统").Frame("main_5").WebButton("新 建").Click
Browser("系统登录").Page("贵阳市新型农村合作医疗信息管理系统").Sync
运行到Browser("系统登录").Page("贵阳市新型农村合作医疗信息管理系统").Frame("main").WebEdit("ylzh").Submit
出错 Browser("系统登录").Page("贵阳市新型农村合作医疗信息管理系统").Frame("main").WebEdit("ylzh").Submit
你的系统中应该是使用了放大镜这样的技术。看看“医疗证号”的输入框附近,应该会有一个图标之类的,用鼠标点击这个图标,应该可以达到和点击回车键一样的效果。不能直接点回车键,只能回避。 没有,只能通过回车键来查询该“医疗证号”对应的人员信息 Browser("系统登录").Page("贵阳市新型农村合作医疗信息管理系统").Frame("main").WebEdit("ylzh").Set "d1003"
Browser("系统登录").Page("贵阳市新型农村合作医疗信息管理系统").Frame("main").WebEdit("ylzh").Submit
Browser("系统登录").Page("贵阳市新型农村合作医疗信息管理系统").Frame("main_2").WebList("personoid").Select "d1003"
看上面的代码,同样的一个页面却出现了两个Frame--Frame("main")Frame("main_2"),应该是中间有一个弹出页。
你试试看这样的操作:把医疗证号设这样两个编号:dl003,dl004,然后在输入框中输入dl00,直接点回车键,看会不会有一个弹出页,让你选择具体的编号。 由于我描述不清,以及把“医疗证号”和“人员”设成相同的名称,可能会引起大家的误解。
看以下图示应该就明白了
在你那乱七八糟的要输入的代码后面在加一行:
Browser("系统登录").Page("系统登录").Image("space").ClickBrowser("系统登录").Page("贵阳市新型农村合作医疗信息管理系统").Frame("left").Image("menu_02").Click
Browser("系统登录").Page("贵阳市新型农村合作医疗信息管理系统").Frame("left").Link("补偿管理").Click
Browser("系统登录").Page("贵阳市新型农村合作医疗信息管理系统").Frame("main").WebEdit("ylzh").Set "d1003"
加行:
Browser("系统登录").Page("贵阳市新型农村合作医疗信息管理系统").Frame("main").WebEdit("ylzh").Set micReturn
试试看吧。 这语句什么意思?
加了不管用啊,回放时WebEdit("ylzh")里的值变为<__MicReturn> 可以参考以下解决方法:
关键是:焦点在什么状态下,点击Enter
把以下这句:
Browser("系统登录").Page("贵阳市新型农村合作医疗信息管理系统").Frame("main").WebEdit("ylzh").Submit
替换成以下几句:
Browser("系统登录").Page("贵阳市新型农村合作医疗信息管理系统").Frame("main").WebEdit("ylzh").FireEvent("onfocus")
set WshShell =CreateObject("WScript.Shell")
WshShell.SendKeys "{ENTER}"
----另外个人感觉,“只能用回车进行确定”很不妥当;程序应该再提供一个按钮;试想如果一台电脑上没有键盘只有鼠标,就不方便进行操作了;所以你应该建议程序开发人员,增加这个按钮
[ 本帖最后由 kai_top 于 2006-2-7 09:56 编辑 ]
你增加一个键盘事件就行了!
增加一个ENTER事件 在Browser("系统登录").Page("贵阳市新型农村合作医疗信息管理系统").Frame("main").WebEdit("ylzh").Set "d1003"之后~
:) 谢谢大家的帮助,问题解决了:) 楼主,请问你是什么解决的?
我现在碰到与你类似的问题,但是按论坛中提供的各种办法都无法解决,请赐教,谢谢啦~~ 原帖由 晶晶 于 2006-2-9 10:47 发表
谢谢大家的帮助,问题解决了:)
这样的家伙,真的辜负了大家对你的帮助,你怎么解决的写出来啊。这样可以让更多的人受益! sdlkfj2 sdlkfj8 一年前的帖子...... 郁闷,一年前的帖子都给翻出来了,又不给个答案sdlkfj9