asp自定义函数:创建Windows样式de 随机GUID
'功能：创建 Windows - 样式随机 GUID
'可以在 CreateGUID 函数中将 sValid 扩展为 0123456789ABCDEFGHIJKLMNOPQRSTUVWXYZ
'关于Guid的定义可以查看本文底部的相关文章
Function CreateWindowsGUID()
CreateWindowsGUID = CreateGUID(8) & "-" & _
CreateGUID(4) & "-" & _
CreateGUID(4) & "-" & _
CreateGUID(4) & "-" & _
CreateGUID(12)
End Function
Function CreateGUID(iLength)
Randomize Timer
Dim i, sGUID
Const sValid = "0123456789ABCDEF"
For i = 1 To iLength
sGUID = sGUID & Mid(sValid, Int(Rnd(1) * Len(sValid)) + 1, 1)
Next
CreateGUID = sGUID
End Function
%> from:asp学习网/title:asp自定义函数:创建Windows样式de 随机GUID/ time:2007-12-31 23:16:24
本文主题GUID
