Set a=Browser("creationtime:=0").page("micclass:=page").ChildObjects
print a.count
For i=0 to a.count-1
print a(i).GetroProperty("text")&" "&a(i).getroproperty("micclass")
OR
set OPage=Browser("Index:=0").Page(":=").childobjects
msgbox OPage.Count.
Loading