ASP生成GUID字符串

<% Function GetGuid()   Set TypeLib = Server.CreateObject("Scriptlet.TypeLib")   GetGuid = TypeLib.Guid   Set TypeLib = Nothing  End Function response.write getguid()%>