How to generate a GUID in VBScript?
Function CreateGUID Dim TypeLib Set TypeLib = CreateObject(“Scriptlet.TypeLib”) CreateGUID = Mid(TypeLib.Guid, 2, 36) End Function This function will return a plain GUID, e.g., 47BC69BD-06A5-4617-B730-B644DBCD40A9. If you want a GUID in a registry format, e.g., {47BC69BD-06A5-4617-B730-B644DBCD40A9}, change the function’s last line to CreateGUID = Left(TypeLib.Guid, 38)