大家好,又见面了,我是你们的朋友全栈君。如果您正在找激活码,请点击查看最新教程,关注关注公众号 “全栈程序员社区” 获取激活教程,可能之前旧版本教程已经失效.最新Idea2022.1教程亲测有效,一键激活。
Jetbrains全系列IDE稳定放心使用
var ExcelSheet = new ActiveXObject(“Excel.Sheet”)
2 ExcelSheet.ActiveSheet.Cells(1,1).Value = “This is column A, row 1”;
3 ExcelSheet.SaveAs(“C:\\TEST.XLS”);
4 ExcelSheet.Application.Quit();
下面我们来看看怎样创建远程服务器中创建对象,但是这有一个前提就是要将Internet安全性关闭。要在远程网络计算机创建对象,可以将该计算机的名称传递给 ActiveXObject 的 servername 参数。该名称与共享名的机器名部分相同。比如共享名为 “\\myserver\public” 的网络,servername 是 “myserver”。另外,可以用 DNS 格式或 IP 地址指定 servername。下面的代码返回在名为 “myserver” 的远程网络计算机上运行的 Excel 实例的版本号:
2 var XLApp = new ActiveXObject(“Excel.Application”, “MyServer”);
3 return(XLApp.Version);
4 }
- 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’);
- }
//左右位置的设置,如果在边距设置10,则注册表的值为0.39370
function pagesetup_null(){
try{
var RegWsh = new ActiveXObject(“WScript.Shell”);
hkey_key=”header”;
RegWsh.RegWrite(hkey_root+hkey_path+hkey_key,””);
hkey_key=”footer”;
RegWsh.RegWrite(hkey_root+hkey_path+hkey_key,””);
window.print();
}catch(e){
window.print();
}
}
发布者:全栈程序员-用户IM,转载请注明出处:https://javaforall.cn/182065.html原文链接:https://javaforall.cn
【正版授权,激活自己账号】: Jetbrains全家桶Ide使用,1年售后保障,每天仅需1毛
【官方授权 正版激活】: 官方授权 正版激活 支持Jetbrains家族下所有IDE 使用个人JB账号...