获取Browsers的数量
Set oDescBrowser = Description.Create
oDescBrowser("micclass").value = "Browser"
Set allBrowsers = Desktop.ChildObjects(oDescBrowser)
Msgbox allBrowsers.Count
Set oDescBrowser = Description.Create
oDescBrowser("micclass").value = "Browser"
Set allBrowsers = Desktop.ChildObjects(oDescBrowser)
Msgbox allBrowsers.Count