javascript取得机器名，用户名，读写注册表，启动应用程序

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>

那怎样看我机器上有哪些ActiveXObject?

开始-> 运行:regedit

查找：AccClientDocMgr.AccClientDocMgr