代码如下:
JScript

复制代码 代码如下:
function GenerateGuid() { 
    var TypeLib = new ActiveXObject("Scriptlet.TypeLib"); 
    return (TypeLib.Guid); 


VBScript
复制代码 代码如下:
Function GenerateGuid() 
    Dim TypeLib 
    Set TypeLib = Server.CreateObject("Scriptlet.TypeLib") 
    GenerateGuid = TypeLib.Guid 
End Function 

如果要在客户端使用的话,VBScript的代码需要稍做修改,即把:

Set TypeLib = Server.CreateObject("Scriptlet.TypeLib")

修改为:

Set TypeLib = CreateObject("Scriptlet.TypeLib")

但是在客户端使用ActiveX的时候,IE默认的安全设置会提示是否允许使用ActiveX,所以并不推荐使用。
如果是asp服务器端下可以这样
ASP (using vbs)
复制代码 代码如下:
Function GUID()
Dim objTypeLib
Set objTypeLib = CreateObject("Scriptlet.TypeLib")
GUID = Left(CStr(objTypeLib.Guid),38)
Set objTypeLib = Nothing
End Function


ASP (using jscript) 在服务端创建 GUID 的代码如下:
复制代码 代码如下:
function GUID(){
return new ActiveXObject("Scriptlet.TypeLib").Guid.toString().substring(0,38);
}
华山资源网 Design By www.eoogi.com
广告合作:本站广告合作请联系QQ:858582 申请时备注:广告合作(否则不回)
免责声明:本站资源来自互联网收集,仅供用于学习和交流,请遵循相关法律法规,本站一切资源不代表本站立场,如有侵权、后门、不妥请联系本站删除!
华山资源网 Design By www.eoogi.com

稳了!魔兽国服回归的3条重磅消息!官宣时间再确认!

昨天有一位朋友在大神群里分享,自己亚服账号被封号之后居然弹出了国服的封号信息对话框。

这里面让他访问的是一个国服的战网网址,com.cn和后面的zh都非常明白地表明这就是国服战网。

而他在复制这个网址并且进行登录之后,确实是网易的网址,也就是我们熟悉的停服之后国服发布的暴雪游戏产品运营到期开放退款的说明。这是一件比较奇怪的事情,因为以前都没有出现这样的情况,现在突然提示跳转到国服战网的网址,是不是说明了简体中文客户端已经开始进行更新了呢?