Browser("Welcome: Mercury Tours").Page("Welcome: Mercury Tours").Image("Featured Destination:").Click
x=Browser("Welcome: Mercury Tours").Page("Welcome: Mercury Tours").Image("Featured Destination:").GetROProperty("abs_x")
y =Browser("Welcome: Mercury Tours").Page("Welcome: Mercury Tours").Image("Featured Destination:").GetROProperty("abs_y")
Set objDevice=Createobject("Mercury.Devicereplay")
objDevice.MouseMove x,y
wait (10)
x=Browser("Welcome: Mercury Tours").Page("Welcome: Mercury Tours").Image("Featured Destination:").GetROProperty("abs_x")
y =Browser("Welcome: Mercury Tours").Page("Welcome: Mercury Tours").Image("Featured Destination:").GetROProperty("abs_y")
Set objDevice=Createobject("Mercury.Devicereplay")
objDevice.MouseMove x,y
wait (10)
No comments:
Post a Comment