Count & Close All Browsers

QTP Script to get total count, names of all open browsers and to close them using descriptive programming.

Set ab=Description.Create

ab("micclass").value="Browser"

Set obj=Desktop.ChildObjects(ab)

Msgbox obj.count

For i=0 to obj.count-1

                c=obj(i).getroproperty("name")

                Msgbox(c)

                obj(i).Close

Next