如何用QTP录制鼠标右键点击事件

最新推荐文章于 2024-10-03 20:21:41 发布

xianglong_yin

最新推荐文章于 2024-10-03 20:21:41 发布

阅读量159

点赞数

分类专栏： QTP 文章标签： shell

本文链接：https://blog.csdn.net/xianglong_yin/article/details/84006872

版权

QTP 专栏收录该内容

11 篇文章 0 订阅

订阅专栏

先说明下，我的qtp版本是10.0的，系统是win7+ie8,其他版本及其他系统我是没有试过哦。。。。

刚开始在网上找了好久，都没有调试成功，最后终于调试成功了，特分享下，其中五步是这次的重点，我最大的突破是1,4步骤，刚开始我把574,263,micRightBtn 放在第六步上了，也许偶太笨吧，毕竟偶对编程不熟哦，请不要笑话哦，也有可能这里有不妥之处，但是我的目的达到了.网上基本说的还要在第5步之前加

Set wshShell = CreateObject(”WScript.Shell”)
wshShell.SendKeys “{DOWN}” //键盘向下的箭头
wshShell.SendKeys “{DOWN}”
wshShell.SendKeys “{ENTER}” //回车键

偶试过了，就算右键的菜单多了，不加上面的代码也不会出问题的。加了到会出问题的。。。。

Browser("特易资讯 | Topease.net 版权所有").Page("特易资讯 | Topease.net 版权所有").Image("关闭").Click
Browser("特易资讯 | Topease.net 版权所有").Page("特易资讯 | Topease.net 版权所有_2").WebEdit("ctl00$UserName").Set "****"
Browser("特易资讯 | Topease.net 版权所有").Page("特易资讯 | Topease.net 版权所有_2").WebEdit("ctl00$PassWord").SetSecure "********"
Browser("特易资讯 | Topease.net 版权所有").Page("特易资讯 | Topease.net 版权所有_2").Image("ctl00$ImageButton1").Click 63,17
1.Browser("特易资讯 | Topease.net 版权所有").Page("全球外贸资讯").Link("我的收藏").Click
2.wait(10)
3.Setting.WebPackage("ReplayType") = 2
4.Browser("特易资讯 | Topease.net 版权所有").Page("全球外贸资讯").Link("我的收藏").Click 574,263,micRightBtn
5.Setting.WebPackage("ReplayType")=1
6.Browser("特易资讯 | Topease.net 版权所有").Page("全球外贸资讯_2").Link("删除").Click
Browser("特易资讯 | Topease.net 版权所有").Page("全球外贸资讯_2").WebButton("确定").Click