51Testing软件测试论坛

 找回密码
 (注-册)加入51Testing

QQ登录

只需一步,快速开始

微信登录,快人一步

手机号码,快捷登录

查看: 2265|回复: 3
打印 上一主题 下一主题

[原创] 右键点击某链接用micRightBtn参数没有效果

[复制链接]

该用户从未签到

跳转到指定楼层
1#
发表于 2009-12-29 19:03:25 | 只看该作者 回帖奖励 |倒序浏览 |阅读模式
我想打开百度首页,然后在新闻那个链接这里右键,选择右键菜单的第三项save target as,应该会弹出一个对话框,但是现在模拟不出该效果,不知道是什么原因呢,高手指点!

SystemUtil.Run "C:\Program Files\Internet Explorer\IEXPLORE.EXE","","C:\Documents and Settings\huyaj","open"
Browser("百度一下,你就知道").Page("百度一下,你就知道").Sync
Browser("百度一下,你就知道").Navigate "http://www.baidu.com/"
Browser("百度一下,你就知道").Page("百度一下,你就知道").Link("新 闻").Click micRightBtn


Set WshShell = CreateObject("WScript.Shell")
For i = 1 To 3
    WshShell.sendKeys "{DOWN}"
Next
WshShell.sendKeys "{ENTER}"
Set WshShell = nothing
分享到:  QQ好友和群QQ好友和群 QQ空间QQ空间 腾讯微博腾讯微博 腾讯朋友腾讯朋友
收藏收藏
回复

使用道具 举报

该用户从未签到

2#
发表于 2009-12-29 19:32:12 | 只看该作者
SystemUtil.Run "C:\Program Files\Internet Explorer\IEXPLORE.EXE","","C:\Documents and Settings\huyaj","open"
Browser("百度一下,你就知道").Page("百度一下,你就知道").Sync
Browser("百度一下,你就知道").Navigate "http://www.baidu.com/"
Setting.WebPackage("ReplayType") = 2
Browser("百度一下,你就知道").Page("百度一下,你就知道").Link("新 闻").Click 0,0,micRightBtn
Setting.WebPackage("ReplayType") = 1


Set WshShell = CreateObject("WScript.Shell")
For i = 1 To 3
    WshShell.sendKeys "{DOWN}"
Next
WshShell.sendKeys "{ENTER}"
Set WshShell = nothing
回复 支持 反对

使用道具 举报

该用户从未签到

3#
 楼主| 发表于 2009-12-29 20:40:23 | 只看该作者
哈,搞定,谢谢ls. 问一下为什么这里要设置replaytype为2或者1呢?还有,这里一定要0,0这样的坐标吗?因为我看help,好像不设坐标的话,默认x就是对象的宽度的中间值,y就是0,我觉得也挺好啊,所以好难理解啊...
回复 支持 反对

使用道具 举报

该用户从未签到

4#
发表于 2009-12-30 13:20:26 | 只看该作者

回复 3# 的帖子

replaytype
1 - Runs mouse operations using browser events.
2 - Runs mouse operations using the mouse.  
你的应用应该选择鼠标模式。

0,0是个人用法上的习惯,呵呵,就是这个对象的左上角的第一个像素位置。
回复 支持 反对

使用道具 举报

本版积分规则

关闭

站长推荐上一条 /1 下一条

小黑屋|手机版|Archiver|51Testing软件测试网 ( 沪ICP备05003035号 关于我们

GMT+8, 2024-11-16 18:28 , Processed in 0.080534 second(s), 27 queries .

Powered by Discuz! X3.2

© 2001-2024 Comsenz Inc.

快速回复 返回顶部 返回列表