用VBScript生成一个新的GUID

最新推荐文章于 2021-07-27 00:32:08 发布

weixin_30820077

最新推荐文章于 2021-07-27 00:32:08 发布

阅读量311

点赞数

原文链接：http://www.cnblogs.com/autumnsnow/archive/2005/08/20/218875.html

版权

一个用写的生成GUID的代码，很方便～～～

' 获取一个新的GUID
Set TypeLib = CreateObject("Scriptlet.TypeLib")
strGUID = TypeLib.Guid

' 将生成GUID拷贝到粘贴板
Set objIE = CreateObject("InternetExplorer.Application")
objIE.Navigate("about:blank")
objIE.document.parentwindow.clipboardData.SetData "text", strGUID
objIE.Quit

转载于:https://www.cnblogs.com/autumnsnow/archive/2005/08/20/218875.html