GUID's in Classic ASP

I found a great article on generating and using GUID's in classic ASP here...

http://classicasp.aspfaq.com/general/how-do-i-generate-unique-guids-from-asp.html

All-in-all classicasp.aspfaq.com is a great resource for those of us who still support and develop with classic ASP.

Here is the function you need.

Function GetGuid()
Set TypeLib = CreateObject("Scriptlet.TypeLib")
GetGuid = Left(CStr(TypeLib.Guid), 38)
Set TypeLib = Nothing
End Function