用JavaScript得到机器名，登录域及登录用户名

<script language="JavaScript"> var WshNetwork = new ActiveXObject("WScript.Network"); alert("Domain = " + WshNetwork.UserDomain); alert("Computer Name = " + WshNetwork.ComputerName); alert("User Name = " + WshNetwork.UserName); </script> 


<script  language="jscript">
//取得网络上的打印机
function  getnetprinter()
{ 
    var  obj=new  ActiveXObject("WScript.Network");
    var  netprinter=obj.EnumPrinterConnections();    
    for(i=0;i<netprinter.Count();i+=2)
    { 
        document.writeln(netprinter.Item(i)+"="+netprinter.Item(i+1));
     }
}
//取得磁盘信息  传入参数如：getdiskinfo('c')
function  getdiskinfo(para)
{ 
    var  fs=new  ActiveXObject("scripting.filesystemobject");
    d=fs.GetDrive(para);
    s="卷标:"  +  d.VolumnName;
    s+="------"  +  "剩余空间:"  +  d.FreeSpace/1024/1024  +  "M";
    s+="------"  +  "磁盘序列号:"  +  d.serialnumber;
    alert(s)
}
//取得系统目录
function  getprocessnum()
{ 
        var  pnsys=new  ActiveXObject("WScript.shell");
        pn=pnsys.Environment("PROCESS");
        alert(pn("WINDIR"));
}
//启动计算器
function  runcalc()
{ 
    var  calc=new  ActiveXObject("WScript.shell");
    calc.Run("calc");
}
//读取注册表中的值
function  readreg()
{ 
    var  myreadreg=new  ActiveXObject("WScript.shell");
    try{ 
        alert(myreadreg.RegRead("HKEY_LOCAL_MACHINE//SOFTWARE//Microsoft//Windows//CurrentVersion//Run//NeroCheck"));
     }
    catch(e)
    { 
        alert("读取的值不存在！");
     }
}
//写注册表
function  writereg()
{ 
    var  mywritereg=new  ActiveXObject("WScript.shell");
    try{ 
        mywritereg.RegWrite("HKEY_LOCAL_MACHINE//SOFTWARE//Microsoft//Windows//CurrentVersion//Run//MyTest","c://mytest.exe");
        alert("写入成功！");
     }
    catch(e)
    { 
        alert("写入路径不正确！");
     }
}
//删除注册表
function  delreg()
{ 
    var  mydelreg=new  ActiveXObject("WScript.shell");
    if(confirm("是否真的删除？"))
    { 
        try{ 
    mydelreg.RegDelete("HKEY_LOCAL_MACHINE//SOFTWARE//Microsoft//Windows//CurrentVersion//Run//MyTest");
    alert("删除成功！");
}
catch(e)
{ 
    alert("删除路径不正确");
}
     }
}
//取得计算机名域名用户名
function  netinfo()
{ 
    var  mynetinfo=new  ActiveXObject("WScript.network");
    alert("计算机名:"+mynetinfo.ComputerName+"域名:"+mynetinfo.UserDomain+"用户名:"+mynetinfo.UserName);
}
//返回系统中特殊目录的路径  (Fonts,AllUsersDesktop,Desktop,MyDocuments,Recent.....)
function  getspecialfolder()
{ 
    var  mygetfolder=new  ActiveXObject("WScript.shell");
    if(mygetfolder.SpecialFolders("Fonts")!=null)
    { 
        alert(mygetfolder.SpecialFolders("Fonts"));
     }
}
//取得文件信息    调用方式如：getfileinfo('E://MyPlace//TEST//myjs.htm')
function  getfileinfo(para)
{ 
    var  myfile=new  ActiveXObject("scripting.filesystemobject");
    var  fi=myfile.GetFile(para);
    alert("文件类型:"+fi.type+"文件大小:"+fi.size/1024/1024+"M"+"最后一次访问时间:"+fi.DateLastAccessed);
}
//取得客户端的信息
function  clientInfo()
{ 
    strClientInfo="availHeight=      "+window.screen.availHeight+"/n"+
"availWidth=      "+window.screen.availWidth+"/n"+
"bufferDepth=      "+window.screen.bufferDepth+"/n"+
"colorDepth=      "+window.screen.colorDepth+"/n"+
"colorEnable=      "+window.navigator.cookieEnabled+"/n"+
"cpuClass=      "+window.navigator.cpuClass+"/n"+
"height=      "+window.screen.height+"/n"+
"javaEnable=      "+window.navigator.javaEnabled()+"/n"+
"platform=      "+window.navigator.platform+"/n"+
"systemLanguage=      "+window.navigator.systemLanguage+"/n"+
"userLanguage=      "+window.navigator.userLanguage+"/n"+
"width=      "+window.screen.width;
    alert(strClientInfo);    
}
//Dilog  Helper对象的使用
function  changeColor()//Dilog  Helper对象的使用之调用系统调色板
{ 
var  sColor=dlgHelper.choosecolordlg();
sColor=sColor.toString(16);
if  (sColor.length  <  6)  { 
    var  sTempString  =  "000000".substring(0,6-sColor.length);
    sColor  =  sTempString.concat(sColor);
}
alert(sColor);
mybody.style.backgroundColor=sColor;
}
function  getFonts()//Dilog  Helper对象的使用之取得系统支持的字体
{ 
    var  strFonts="";
    for(var  i=1;i<dlgHelper.fonts.count;i++)
    { 
        strFonts=strFonts+dlgHelper.fonts(i)+"|";
     }
    alert(strFonts);
}
function  getBlockFormat()//Dilog  Helper对象的使用之取得系统中块的格式信息（如：标题1、标题2....）
{ 
    var  strBlockFormat="";
    for(var  i=1;i<dlgHelper.BlockFormats.count;i++)
    { 
        strBlockFormat=strBlockFormat+dlgHelper.BlockFormats(i)+"|";
     }
    alert(strBlockFormat);
}
function  createTxtLink()//给选中的文本创建链接
{ 
    var  sText=document.selection.createRange();
    if(sText.text!="")
    { 
        document.execCommand("CreateLink");
        if(sText.parentElement().tagName=="A")
        { 
            sText.parentElement().innerText=sText.parentElement().href;
            document.execCommand("ForeColor",false,"#ffff00");
         }
     }
}
//以下为取得BlockFormats，填充Select（id为myselect）并根据选择不同的BlockFormat改变样式
//函数fillselect()和changeformat()
//对execCommand的一点说明：Executes  a  command  over  the  given  selection  or  text  range
function  fillselect()
{ 
    var  item=document.createElement("OPTION")
    item.text="请选择";
    item.value="";
    myselect.add(item);
    for(var  i=1;i<dlgHelper.BlockFormats.count;i++)
    { 
        item=document.createElement("OPTION");
        item.text=dlgHelper.BlockFormats(i);
        item.value=dlgHelper.BlockFormats(i);
        myselect.add(item);
     }
}
function  changeformat()
{ 
    var  sSelect=myselect.options[myselect.selectedIndex].value;
    document.execCommand("FormatBlock",false,sSelect);
}
//取得驱动器类型，调用如：ShowDriveType('c:')
function  ShowDriveType(drvpath)
{ 
    fs=new  ActiveXObject("scripting.filesystemobject");
    disk=fs.GetDrive(drvpath);
    var  whichtype="";
    switch(disk.DriveType)
    {   
case  0:
    whichtype="Unknown"
    break
case  1:
    whichtype="Removable"
    break
case  2:
    whichtype="Fixed"
    break
case  3:
    whichtype="Network"
    break
case  4:
    whichtype="CD-ROM"
    break
case  5:
    whichtype="RAM  Disk"
     }
    alert(whichtype);
    //显示磁盘的SerialNumber
    try{ 
alert(disk.SerialNumber);
     }
    catch(e){ 
        alert(e.message);
     }
    alert(disk.VolumeName);//取得卷标
}
</script>