Script to get names of all the links

Set Obj = Description.Create()
Obj("micclass").value = "Link"
Set ChildObj = Browser("name:=Name of the Browser").Page("title:=Title of the Page").ChildObjects(Obj)
msgbox ChildObj.count,0, "Number of links"
For i = 0 to ChildObj.count - 1
msgbox ChildObj(i).GetROProperty("name"),0,"Link Name"
Next