ActiveXObject

 
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');   
}  

  • 4
    点赞
  • 23
    收藏
    觉得还不错? 一键收藏
  • 1
    评论

“相关推荐”对你有帮助么?

  • 非常没帮助
  • 没帮助
  • 一般
  • 有帮助
  • 非常有帮助
提交
评论 1
添加红包

请填写红包祝福语或标题

红包个数最小为10个

红包金额最低5元

当前余额3.43前往充值 >
需支付:10.00
成就一亿技术人!
领取后你会自动成为博主和红包主的粉丝 规则
hope_wisdom
发出的红包
实付
使用余额支付
点击重新获取
扫码支付
钱包余额 0

抵扣说明:

1.余额是钱包充值的虚拟货币,按照1:1的比例进行支付金额的抵扣。
2.余额无法直接购买下载,可以购买VIP、付费专栏及课程。

余额充值