在Internet Explorer网络浏览器中,ActiveX控件的GUID是在注册时分配的。以下是一个示例VBScript代码段,可以向注册表添加ActiveX控件,并指定GUID:
Dim objShell
Set objShell = CreateObject("WScript.Shell")
'向注册表添加控件
objShell.RegWrite "HKEY_CLASSES_ROOT\CLSID\{YourGUID}\InprocServer32\", "C:\YourControl.dll", "REG_SZ"
'将控件与Internet Explorer关联
objShell.RegWrite "HKEY_CLASSES_ROOT\TypeLib\{YourGUID}\1.0\0\win32\", "C:\YourControl.dll", "REG_SZ"
objShell.RegWrite "HKEY_CLASSES_ROOT\TypeLib\{YourGUID}\1.0\0\FLAGS\", "0", "REG_SZ"
objShell.RegWrite "HKEY_CLASSES_ROOT\TypeLib\{YourGUID}\1.0\0\HELPDIR\", "C:\YourControl", "REG_SZ"
objShell.RegWrite "HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\Internet Explorer\ActiveX Compatibility\{YourGUID}\CompatibilityFlags", "0", "REG_DWORD"
在代码中,{YourGUID}应该替换为您定义ActiveX控件的GUID。这个示例代码将控件文件指定为C:\YourControl.dll,您需要将其替换为您的文件的路径。 通过运行上述代码,将添加一个新的ActiveX控件注册到计算机上,并分配一个GUID。在Internet Explorer中,该ActiveX控件就可以使用该GUID标识。