Custom Search

Sunday, September 19, 2010

There are some links on the web page,write a script to count and click those links and check the text on the page displayed on clicking the links.

Set obj=Description.Create()
obj("micclass").value="Link"
Set links=Browser("Gmail: Email from Google").Page("Gmail: Email from Google").ChildObjects(obj)
countLinks=links.Count
msgbox "Num of links"& links.Count
For i=0 to countLinks-1
        text= links(i).GetROProperty("Text")
        If text="Link Name" Then
              links(i).click
         End If
next

No comments:

Post a Comment

Note: Only a member of this blog may post a comment.