Code is as follows -
Browser(”Browser”).Page(”Page”).WebTable(”table”).FireEvent “onclick”,,,micRightBtn ‘Right click on the webtable
Set myShell = CreateObject(”WScript.Shell”) ‘create instance of Shell Object
myMenu = 5 ‘Option number from floating menu
For i = 1 To myMenu
WshShell.sendkeys “{DOWN}” ‘Navigate to the menu item
Next
WshShell.sendkeys “{ENTER}”
Set myShell = nothing
Browser(”Browser”).Page(”Page”).WebTable(”table”).FireEvent “onclick”,,,micRightBtn ‘Right click on the webtable
Set myShell = CreateObject(”WScript.Shell”) ‘create instance of Shell Object
myMenu = 5 ‘Option number from floating menu
For i = 1 To myMenu
WshShell.sendkeys “{DOWN}” ‘Navigate to the menu item
Next
WshShell.sendkeys “{ENTER}”
Set myShell = nothing
No comments:
Post a Comment