用vbs返回 Internet Explorer 的下載控件和 Applet 的列表

更新時間：2007年04月02日 00:00:00 作者：

問：
嗨，Scripting Guy！要找出已為 Internet Explorer 下載了哪些程序，有沒有簡便的方法（這些項目在文件夾 C:\Windows\Downloaded Program Files 中）？我可以使用一個腳本獲得可執(zhí)行文件名和依存文件，但是我想獲得它們顯示在文件夾中的文件名。

-- AC

答：
您好，AC。當(dāng)您下載了 ActiveX 控件或 Java 小程序時，這些項目通常會放置在“Downloaded Program”文件夾中。您可以在 Windows 資源管理器中或從 Internet Explorer 中查看這些項目。（單擊“Internet 選項”，然后在“常規(guī)”選項卡上單擊“設(shè)置”。在“設(shè)置”對話框中，單擊“查看對象”。）

當(dāng)您使用 Windows 資源管理器查看文件夾內(nèi)容時，您會看到“MSN File Upload Control”之類的友好名稱。不過，如果您使用 dir 命令或使用 FileSystemObject 之類的腳本訪問此文件夾，您就會看到“MsnUpld.cab”之類的可執(zhí)行文件名。您希望能夠使用腳本返回您在 Windows 資源管理器中看到的這些友好名稱。

那么您該怎么做呢？當(dāng)然了，您可以使用下面的這個腳本：

復(fù)制代碼代碼如下:

strComputer = "."  
Set objWMIService = GetObject("winmgmts:\\" & strComputer & _  
    "\root\cimv2\Applications\MicrosoftIE")  

Set colIESettings = objWMIService.ExecQuery _  
    ("Select * from MicrosoftIE_Object")  

For Each strIESetting in colIESettings  
    Wscript.Echo "Code base: " & strIESetting.CodeBase  
    Wscript.Echo "Program file: " & strIESetting.ProgramFile  
    Wscript.Echo "Status: " & strIESetting.Status  
    Wscript.Echo  
Next 

此腳本依賴于類 MicrosoftIE_Object 和命名空間 root\cimv2\Applications\MicrosoftIE，據(jù)我們所知，這個類和這個命名空間都還未經(jīng)過證明。但是，似乎這個腳本可以使用；運(yùn)行此腳本，您將得到與以下內(nèi)容類似的輸出：

Code base: http://sc.groups.msn.com/controls/FileUC/MsnUpld.cab
Program file: MSN File Upload Control
Status: Installed

正如您看到的那樣，“ProgramFile”屬性為您提供了與顯示在“Downloaded Programs”文件夾中相同的友好名稱。