请教：QTP是否录制不了使用回车键查询的功能？

晶晶

如图示：须先输入证号，按enter 后显示人员信息，然后才能录入其它操作。
但回放后出错，无法查询到人员信息。
请问如何解决呢？

[ 本帖最后由 晶晶 于 2006-1-26 11:03 编辑 ]

每天喝水

你的问题描述不清！
首先，回车是可以被录制的。
其次，从截图上看，登陆界面应该有几个必填项目，不知道你是否都填写了。
最后，WEB的反应时间不是立即的。可能是由于延时所引起的。加上个等待函数或其它的什么应该就可以了。

要是再不行，那就靠运气吧。

lovetest6

加wait应该可以解决你的问题
wait(5)

晶晶

加了等待函数还是不起作用

yangkinki

你在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
出错

mstiunicon

Browser("系统登录").Page("贵阳市新型农村合作医疗信息管理系统").Frame("main").WebEdit("ylzh").Submit
你的系统中应该是使用了放大镜这样的技术。看看“医疗证号”的输入框附近，应该会有一个图标之类的，用鼠标点击这个图标，应该可以达到和点击回车键一样的效果。不能直接点回车键，只能回避。

晶晶

没有，只能通过回车键来查询该“医疗证号”对应的人员信息

mstiunicon

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").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").Set micReturn

试试看吧。

晶晶

这语句什么意思？

加了不管用啊，回放时WebEdit("ylzh")里的值变为<__MicReturn>

kai_top

可以参考以下解决方法:
关键是：焦点在什么状态下，点击Enter
把以下这句：
Browser("系统登录").Page("贵阳市新型农村合作医疗信息管理系统").Frame("main").WebEdit("ylzh").Submit
替换成以下几句：

1. 
   
2. Browser("系统登录").Page("贵阳市新型农村合作医疗信息管理系统").Frame("main").WebEdit("ylzh").FireEvent("onfocus")
   
3. set WshShell =CreateObject("WScript.Shell")
   
4. WshShell.SendKeys "{ENTER}"
   

复制代码

----另外个人感觉，“只能用回车进行确定”很不妥当；程序应该再提供一个按钮；试想如果一台电脑上没有键盘只有鼠标，就不方便进行操作了；所以你应该建议程序开发人员，增加这个按钮

[ 本帖最后由 kai_top 于 2006-2-7 09:56 编辑 ]

hongtang

增加一个ENTER事件 在Browser("系统登录").Page("贵阳市新型农村合作医疗信息管理系统").Frame("main").WebEdit("ylzh").Set "d1003"
之后~

晶晶

谢谢大家的帮助，问题解决了：）

yesman

楼主，请问你是什么解决的？
我现在碰到与你类似的问题，但是按论坛中提供的各种办法都无法解决，请赐教，谢谢啦~~

yhzmw

原帖由 晶晶 于 2006-2-9 10:47 发表
谢谢大家的帮助，问题解决了：）

这样的家伙，真的辜负了大家对你的帮助，你怎么解决的写出来啊。这样可以让更多的人受益！

dlh2002

sdlkfj2

19thangel

sdlkfj8 一年前的帖子......

rita.l

郁闷，一年前的帖子都给翻出来了，又不给个答案sdlkfj9