ASP脚本生成GUID的实现

全球唯一标识符 (GUID) 是一个字母数字标识符，用于指示产品的唯一性安装。在许多流行软件应用程序（例如 Web 浏览器和媒体播放器）中，都使用 GUID。

GUID 的格式为“xxxxxxxx-xxxx-xxxx-xxxx-xxxxxxxxxxxx”，其中每个 x 是 0-9 或 a-f 范围内的一个十六进制的数字。例如：6F9619FF-8B86-D011-B42D-00C04FC964FF 即为有效的 GUID 值。

为什么要用GUID？

世界上的任何两台计算机都不会生成重复的 GUID 值。GUID 主要用于在拥有多个节点、多台计算机的网络或系统中，分配必须具有唯一性的标识符。在 Windows 平台上，GUID 应用非常广泛：注册表、类及接口标识、数据库、甚至自动生成的机器名、目录名等。

ASP生成GUDI的实现

<%

Dim objTypeLib

Set objTypeLib = CreateObject("Scriptlet.TypeLib")

Response.Write objTypeLib.Guid

%>

在本机及网络主机均测试通过。

使用ASP中的GUID还存在点问题，就是如果直接用ASP的组件（当然得服务器支持）生成的GUID是如我前面所说的那样，会多出{}以及一个空格和 e，不经过处理的话，是没办法直接用的，直接用在sql语句里面，会因为“} e”而导致一个截断；因此，如果你想在ASP中使用GUID，用下面我提供的这个函数，就可以正常使用了。

'生成GUID

Function CreateGUID()

Dim objTypeLib,

Set objTypeLib = CreateObject("Scriptlet.TypeLib")

If Err.Number<>0 Then

Response.Write("alert('服务器限制,无法生成GUID');history.back()")

set objTypeLib = Nothing

Response.End

End If

CreateGUID = Mid(objTypeLib.Guid,2,36)

Set objTypeLib = Nothing

End Function