diddom 发表于 2012-6-6 05:29:03

List management tools

说明

使用 Shell 物件来列举已安装在电脑上的所有管理工具。

范例指令码

Const ADMINISTRATIVE_TOOLS = &H2f&
Set objShell = CreateObject("Shell.Application")
Set objFolder = objShell.Namespace(ADMINISTRATIVE_TOOLS)


Set objTools = objFolder.Items
For i = 0 to objTools.Count - 1
    Wscript.Echo objTools.Item(i)
Next
页: [1]
查看完整版本: List management tools