Set TypeLib = CreateObject("Scriptlet.TypeLib")
strGUID = TypeLib.Guid

Set objIE = CreateObject("InternetExplorer.Application")
objIE.Navigate("about:blank")
objIE.document.parentwindow.clipboardData.SetData "text", strGUID
objIE.Quit

新建文本文件，将上面代码copy，然后保存关闭。将文本文件后缀名改为vbs.

如何得到Guid。双击上面建立的vbs后缀名的文件，然后在文本中，crtl+v 就可得到创建的Guid.

VBS和页面中响应COM的事件的方法和代码
COM的CONNECTIONPOINT可以成为一种事件发生回调机制。VBS中接收时间回调的方法是Functionmyobject_onadd(v1,v2)MsgBox"add"&v1&v2EndFunctionSetCnxn4=WScript.CreateObject("ATLCom.ATL

几段非常有用的脚本（来自微软网站,由downmoon精心收集）
几段非常有用的脚本（来自微软网站,由downmoon精心收集）一、在网络硬件故障或网络故障断开时发送警告strComputer="."SetobjWMIService=GetObject("winmgmts:"&strCompu

使用SAFEARRAY返回的代码
前天碰到有人问SAFEARRAY的问题，我正好对VBSCRIPT里面如何得到COM组件返回的数组感兴趣，就试验了一下。IDE用的是VC7.1开始都差不多，建立工程，建立COM