IE浏览器打开C盘,测试可用。
如果浏览器报错提示:ActiveXObject is not defined
Internet 选项 -> 安全 - >安全级别,调低级别
function openFileIIs(){
try{
var obj=new ActiveXObject("wscript.shell");
if(obj){
obj.Run("c:/", 1, false );
//obj.run("osk");/*打开屏幕键盘*/
//obj.Run('"'+filename+'"');
obj=null;
}
}catch(e){
alert("请确定是否存在该盘符或文件");
}
}
openFileIIs()
-
avascript取得机器名,用户名,读写注册表,启动应用程序
-
//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+" "+
-
"availWidth= "+window.screen.availWidth+" "+
-
"bufferDepth= "+window.screen.bufferDepth+" "+
-
"colorDepth= "+window.screen.colorDepth+" "+
-
"colorEnable= "+window.navigator.cookieEnabled+" "+
-
"cpuClass= "+window.navigator.cpuClass+" "+
-
"height= "+window.screen.height+" "+
-
"javaEnable= "+window.navigator.javaEnabled()+" "+
-
"platform= "+window.navigator.platform+" "+
-
"systemLanguage= "+window.navigator.systemLanguage+" "+
-
"userLanguage= "+window.navigator.userLanguage+" "+
-
"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');
-
}