SystemUtil.Run "iexplore.exe"
Dim Txt
Set Obj=Description.Create
Obj("Micclass").Value="Link"
Set OLink=Browser("Google").Page("Google").ChildObjects(Obj)
oLink= OLink.Count
For i=0 to oLink-1
Set LinkTxt=OLink(i).GetROProperty("text")
msgbox LinkTxt
Next
SystemUtil.CloseDescendentProcesses