【VBS】－【再谈CreateObject函数，VBS到底能调用哪些对象？】

最新推荐文章于 2024-09-18 20:38:18 发布

转载

最新推荐文章于 2024-09-18 20:38:18 发布 · 645 阅读

5 ·

CC 4.0 BY-SA版权

原文链接：http://www.cnblogs.com/goodspeed-fish/archive/2013/05/22/3092135.html

文章标签：

#shell #c/c++

本文深入探讨了VBS的CreateObject函数，揭示了如何通过注册表判断对象是否可被脚本调用。尽管存在上千个可能的对象，但实际上大多数不常用，了解并掌握常见对象如WindowsInstaller.Installer等，对于VBS初学者来说更为重要。

摘要生成于 C知道，由 DeepSeek-R1 满血版支持，前往体验 >

VBS的CreateObject函数到底能够创建哪些对象，几乎是每个VBS新手都困惑的问题，他们总是热衷于寻找“VBS对象大全”。

对于系统中存在哪些对象，UMU在《 [UMU WSH 教程](9)CreateObject 过程》中有过这样的回答：

对象的注册信息 HKEY_CLASSES_ROOT\CLSID\{GUID} 下可能会有这样的一些子键：

Control 说明该组件是一个 ActiveX 控件、

Programmable 说明该组件支持自动化、

Insertable 说明该组件可以被嵌入到一个 OLE 文档容器中。

能找到 Programmable，说明支持自动化，也就是支持 IDispatch 接口，所以它可以被脚本语言使用。不过这种方式比较老了，现在已经被一个的组件类属代替，即 Implemented Categories 子键下面的 GUID 形式的子键。比如：

HKEY_CLASSES_ROOT\CLSID\{72C24DD5-D70A-438B-8A42-98424B88AFB8}\Implemented Categories\{40FC6ED5-2438-11CF-A3DB-080036F12502}。

看一下 HKEY_CLASSES_ROOT\Component Categories\{40FC6ED5-2438-11CF-A3DB-080036F12502} 下的 409 字符串值为 Automation Objects，也就是“自动化对象”。

也就是说，如果注册表中一个对象的ProgID对应的CLSID下包含有子键Programmable或者Implemented Categories\{40FC6ED5-2438-11CF-A3DB-080036F12502}，那么这个对象就能用CreateObject函数创建。

假设上面的说法正确，那么我们可以用下面的脚本获取“VBS对象大全”：

Option Explicit

Const HKEY_CLASSES_ROOT = &H80000000
Dim arrProgID, strProgID, strCLSID
Dim objReg, objFso, objFile, objShell

Set objReg = GetObject("winmgmts:\\.\root\default:StdRegProv")
Set objFso = CreateObject("Scripting.FileSystemObject")
Set objShell = CreateObject("WScript.Shell")

Set objFile = objFso.OpenTextFile("ProgID.txt", 2, True)

'By Demon
'http://demon.tw

objReg.EnumKey HKEY_CLASSES_ROOT, ""