09-28-2010, 12:11 PM
HI,
I would suggest to try in the below approach.
I would suggest to try in the below approach.
Code:
Set Brw=Description.Create
Brw("micclass").Value="Browser"
Set Pg=Description.Create
Pg("micclass").Value="Page"
Set Wrg=Description.Create
Wrg("micclass").Value="WebRadioGroup"
Set Brw_Collection=Desktop.ChildObjects(Brw)
msgbox "No. of Browsers: "& Brw_Collection.count
Set Br1_Pgcollection=Brw_Collection(0).childObjects(Pg)
Set Br1_Pg1_WrgCollection=Br1_Pgcollection(0).ChildObjects(Wrg)
msgbox "No. of WebRadioGroups in Browser1,Page1 : "&Br1_Pg1_WrgCollection.count
Set Br2_Pgcollection=Brw_Collection(1).childObjects(Pg)
Set Br2_Pg2_WrgCollection=Br2_Pgcollection(0).ChildObjects(Wrg)
msgbox "No. of WebRadioGroups in Browser2,Page2 : "&Br2_Pg2_WrgCollection.count