取得GUID@ASP

資料來源：http://leancoding.blogspot.com/2008/01/guidasp.html

GUID全名是Globally Unique Identifier，依據微軟的說法：GUID 是一個 128 位元的整數 (16 位元組)，可以在需要唯一識別項時用於所有電腦和網路。
因為重複的機率很低，可以用來當做資料庫的key值，以避免以流水號當作key值時，可以修改網址參數而偷看到別人的資料。這支程式也是從網路上找到的，年代久遠出處已經不可考了。

Function GetGuid()
    Set TypeLib = Server.CreateObject("Scriptlet.TypeLib")
    tg = TypeLib.Guid  GetGuid = mid(tg, 2 ,len(tg)-4)
    Set TypeLib = Nothing
End Function