Hi Srinivas,
Try the below code:
RightClick
Browser("name:=Google").Page("title:=Google").Link("name:=iGoogle")
Window("hwnd:="&Browser("name:=Google").GetROProperty("hwnd")).Type micDwn
+ "A" + micReturn
Function RightClick(Obj)
X = Obj.GetROProperty("abs_x") + Obj.GetROProperty("width")/2
Y = Obj.GetROProperty("abs_y") + Obj.GetROProperty("height")/2
Set deviceReplay = CreateObject( "Mercury.DeviceReplay" )
deviceReplay.MouseClick X,Y,"2"
Set deviceReplay = nothing
End Function
With Regards,
Johnson
--
You received this message because you are subscribed to the Google
"QTP - HP Quick Test Professional - Automated Software Testing"
group.
To post to this group, send email to [email protected]
To unsubscribe from this group, send email to
[email protected]
For more options, visit this group at
http://groups.google.com/group/MercuryQTP?hl=en
