Set a=Browser("creationtime:=0").page("micclass:=page").ChildObjectsprint a.countFor i=0 to a.count-1print a(i).GetroProperty("text")&" "&a(i).getroproperty("micclass") ORset OPage=Browser("Index:=0").Page(":=").childobjectsmsgbox OPage.Count.