声明:本空间的内容不全部是原创,如有雷同只为学习与借鉴之方便,别无它意,来者是朋友,愿通过此平台结交天下测试达狼!

QTP录制菜单(包含右键菜单)

上一篇 / 下一篇  2010-07-21 21:32:34 / 个人分类:QTP

QTP如何鼠标右键菜单51Testing软件测试网] O1SSj

QTP附带的订票网站sample为例,edit控件username鼠标右键,点击paste(第4个菜单项)
m#JH)z8~4F8g+GI0
51Testing软件测试网$[7t)a cUZ X9B
cur_replay_type = Setting.WebPackage("ReplayType")
i xH-NJ$v9Y0
Setting.WebPackage("ReplayType") = 251Testing软件测试网&F Br DLj3r/PKx#a pN-E
Browser("Browser").Page("Welcome:  Tours").WebEdit("userName").Click 5,4, micRightBtn
4MVS2r\~{0
Setting.WebPackage("ReplayType") = cur_replay_type
W0LCH9u Q%eN0

6wbHPDmY0
index=451Testing软件测试网2u(s;Zr?&x'{
Set WshShell = CreateObject("Wscrīpt.Shell")51Testing软件测试网_z!DEY
For i = 1 To index51Testing软件测试网y9vo%s-h
    WshShell.sendKeys "{DOWN}"51Testing软件测试网 @v2}`-\!|d2o!K
Next51Testing软件测试网t]/Kk J? e
WshShell.sendKeys "{ENTER}"
)rE(vxf W0
Set WshShell = nothing

lwk%wk};A9m,U1YG0

51Testing软件测试网P$J+Cp5b,`4U7x

录制,比如打开记事本,点击下拉菜单 "文件"-->"退出";51Testing软件测试网Oc6|6D'eq
回放时会出现 object not visible ;
4BXa)e,`#O&aE0
windows("记事本").click 193,11751Testing软件测试网JC I8J ZpvZ8H J
windows("记事本").winmenu("ContextMenu").Select "文件:退出"
oX#g0KG0
51Testing软件测试网&?2u%o-J^;[6M
QTP默认录制方式是无法录制下拉菜单的,必须修改设置后再录制
0i N-kALeua Fo0Z-G0
修改设置如下:51Testing软件测试网xd Ap x*Hm
tools -> web event recording configuration 点击custom settings... 展开Web objects
4J lT*Xc.m0
选种webelement,点击event -> add -> onmouseover 。并确定在record栏内,状态是enabled51Testing软件测试网w|c@ ]I1V7e
然后再重新录制你的脚本。51Testing软件测试网_8Kd[ JH;UC
执行录制后的脚本,无法回放成功,这是因为脚本只录制了鼠标的onmouseover 事件,却没有录制click
4f~-u Wd9q4fs juX4D0
件,所以脚本录制完后要手动添加click事件。51Testing软件测试网~D\ I(NQ ] E8N


TAG:

haven6 引用 删除 haven6   /   2010-07-22 09:19:13
右键菜单这段老是报错:activex部件不能创建对象:wscript.shell,经查明原因是是网上直接拷贝的代码字母有问题(Set WshShell = CreateObject("Wscrīpt.Shell")),看看("Wscrīpt.Shell"))中,那个字母“i"不正常,把”ī“改成”i“,一切OK
 

评分:0

我来说两句

Open Toolbar