右键点击某链接用micRightBtn参数没有效果

whoamiyaya 发表于 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

wwg1020 发表于 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

whoamiyaya 发表于 2009-12-29 20:40:23

哈,搞定,谢谢ls. 问一下为什么这里要设置replaytype为2或者1呢?还有,这里一定要0,0这样的坐标吗?因为我看help,好像不设坐标的话,默认x就是对象的宽度的中间值,y就是0,我觉得也挺好啊,所以好难理解啊...

wwg1020 发表于 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]

51Testing软件测试论坛 's Archiver

右键点击某链接用micRightBtn参数没有效果

回复 3# 的帖子