javascript取得机器名，用户名，读写注册表，启动应用程序
//javascript有个特殊的对象ActiveXObject，通过它可以访问windows的本地文件系统和应用程序，
比如：有的时候我们需要得到用户的机器名，用户名，得到某个文件的信息，或者读写注册表，或者启动计算器、outlook等应用程序。   下面是一些常用的方法，每个都经过了测试。
<script language="JavaScript">
//取得机器名，登录域及登录用户名
function getusername()
{
var WshNetwork = new ActiveXObject("WScript.Network");
alert("Domain = " + WshNetwork.UserDomain);
alert("Computer Name = " + WshNetwork.ComputerName);
alert("User Name = " + WshNetwork.UserName);
}   //取得系统目录
function getprocessnum()
{   var pnsys=new ActiveXObject("WScript.shell");   pn=pnsys.Environment("PROCESS");   alert(pn("WINDIR"));
}
//返回系统中特殊目录的路径
function getspecialfolder()
{   var mygetfolder=new ActiveXObject("WScript.shell");   if(mygetfolder.SpecialFolders("Fonts")!=null)   {   alert(mygetfolder.SpecialFolders("Fonts"));   }
}
//取得磁盘信息 传入参数如：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("删除路径不正确");
}   }
}
//取得文件信息    调用方式如：getfileinfo('c:\\test.pdf')
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);
}   </script>   //另存为excel文件并写入值
function saveas(){
var ExcelApp = new ActiveXObject("Excel.Application");
var ExcelSheet = new ActiveXObject("Excel.Sheet")   ExcelSheet.Application.Visible = true;   ExcelSheet.ActiveSheet.Cells(1,1).Value = "This is column A, row 1";   ExcelSheet.SaveAs("C:\\TEST.XLS");   ExcelSheet.Application.Quit();   alert('ok')；
}