鼠标右键操作，可惜系统不支持键盘操作，有没有直接模拟鼠标操作的
Browser("系统登录页面").Page("系统登录页面").WebEdit("WebEdit").Set "peter"Browser("系统登录页面").Page("系统登录页面").WebEdit("WebEdit_2").SetSecure "52e7190061fe2a6299ca63e499763293e51fa725"
Browser("系统登录页面").Page("系统登录页面").WebButton("登 录").Click
Browser("系统登录页面").Page("业务流程管理系统").Link("系统管理").Click
Browser("系统登录页面").Page("业务流程管理系统").Link("管理1").Click
Browser("系统登录页面").Page("业务流程管理系统_2").Link("管理2").Click
Setting.WebPackage("ReplayType")=2
Browser("系统登录页面").Page("业务流程管理系统_2").WebElement("右键项").highlight
Browser("系统登录页面").Page("业务流程管理系统_2").WebElement("右键项").Click,,micRightBtn
Set wshShell = CreateObject("WScript.Shell")
wshShell.SendKeys"{DOWN}"'向下键
wshShell.SendKeys"{DOWN}"
wshShell.SendKeys"{EnTER}"'回车键
Setting.WebPackage("ReplayType")=1
页:
[1]
