Код заключается в следующем:
JScript
Кода -копия выглядит следующим образом:
functionGenerateGuid () {
vartypelib = newAcatexObject ("scriptlet.typelib");
return (typelib.guid);
}
VBScript
Кода -копия выглядит следующим образом:
FunctionGenerateGuid ()
Dimtypelib
Settypelib = server.createObject ("scriptlet.typelib")
GenerateAgeuid = typelib.guid
Конечная функция
Если вы хотите использовать его на стороне клиента, код VBScript должен быть немного изменен, то есть:
Settypelib = server.createObject ("scriptlet.typelib")
Модифицировано на:
Settypelib = createObject ("scriptlet.typelib")
Однако, когда клиент использует ActiveX, настройки безопасности по умолчанию IE будут запрашивать, разрешать ли ActiveX, поэтому не рекомендуется его использовать.
Если это сервер ASP, это может быть
ASP (с помощью VBS)
Кода -копия выглядит следующим образом:
Функция guid ()
Dim objtypelib
Установить objtypelib = createObject ("scriptlet.typelib")
GUID = LEAND (CSTR (OBJTYPELIB.GUID), 38)
Установить objtypelib = ничего
Конечная функция
ASP (используя JSCRICT) Код для создания GUID на сервере выглядит следующим образом:
Кода -копия выглядит следующим образом:
function guid () {
вернуть новый ActiveXObject ("scriptlet.typelib"). Guid.toString (). substring (0,38);
}