关闭

JavaScript 经典自定义函数[转帖]

1235人阅读 评论(0) 收藏 举报

有部分有错误,自己找一下,锻炼一:)

//取得网络上的打印机
function getnetprinter()
{
var obj=new ActiveXObject("WScript.Network");
var netprinter=obj.EnumPrinterConnections();
for(i=0;i {
document.writeln(netprinter.Item(i)+"="+netprinter.Item(i+1));
}
}
//取得磁盘信息 传入参数如: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("删除路径不正确");
}
}
}
//取得计算机名域名用户名
function netinfo()
{
var mynetinfo=new ActiveXObject("WScript.network");
alert("计算机名:"+mynetinfo.ComputerName+"域名:"+mynetinfo.UserDomain+"用户名:"+mynetinfo.UserName);
}
//返回系统中特殊目录的路径 (Fonts,AllUsersDesktop,Desktop,MyDocuments,Recent.....)
function getspecialfolder()
{
var mygetfolder=new ActiveXObject("WScript.shell");
if(mygetfolder.SpecialFolders("Fonts")!=null)
{
alert(mygetfolder.SpecialFolders("Fonts"));
}
}
//取得文件信息 调用方式如:getfileinfo('E://MyPlace//TEST//myjs.htm')
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);
}
//Dilog Helper对象的使用
function changeColor()//Dilog Helper对象的使用之调用系统调色板
{
var sColor=dlgHelper.choosecolordlg();
sColor=sColor.toString(16);
if (sColor.length < 6) {
var sTempString = "000000".substring(0,6-sColor.length);
sColor = sTempString.concat(sColor);
}
alert(sColor);
mybody.style.backgroundColor=sColor;
}
function getFonts()//Dilog Helper对象的使用之取得系统支持的字体
{
var strFonts="";
for(var i=1;i {
strFonts=strFonts+dlgHelper.fonts(i)+"|";
}
alert(strFonts);
}
function getBlockFormat()//Dilog Helper对象的使用之取得系统中块的格式信息(如:标题1、标题2....)
{
var strBlockFormat="";
for(var i=1;i {
strBlockFormat=strBlockFormat+dlgHelper.BlockFormats(i)+"|";
}
alert(strBlockFormat);
}

function createTxtLink()//给选中的文本创建链接
{
var sText=document.selection.createRange();
if(sText.text!="")
{
document.execCommand("CreateLink");
if(sText.parentElement().tagName=="A")
{
sText.parentElement().innerText=sText.parentElement().href;
document.execCommand("ForeColor",false,"#ffff00");
}
}
}
//以下为取得BlockFormats,填充Select(id为myselect)并根据选择不同的BlockFormat改变样式
//函数fillselect()和changeformat()
//对execCommand的一点说明:Executes a command over the givenselection or text range
function fillselect()
{
var item=document.createElement("OPTION")
item.text="请选择";
item.value="";
myselect.add(item);
for(var i=1;i {
item=document.createElement("OPTION");
item.text=dlgHelper.BlockFormats(i);
item.value=dlgHelper.BlockFormats(i);
myselect.add(item);
}
}
function changeformat()
{
var sSelect=myselect.options[myselect.selectedIndex].value;
document.execCommand("FormatBlock",false,sSelect);
}
//取得驱动器类型,调用如:ShowDriveType('c:')
function ShowDriveType(drvpath)
{
fs=new ActiveXObject("scripting.filesystemobject");
disk=fs.GetDrive(drvpath);
var whichtype="";
switch(disk.DriveType)
{
case 0:
whichtype="Unknown"
break
case 1:
whichtype="Removable"
break
case 2:
whichtype="Fixed"
break
case 3:
whichtype="Network"
break
case 4:
whichtype="CD-ROM"
break
case 5:
whichtype="RAM Disk"
}
alert(whichtype);
//显示磁盘的SerialNumber
try{
alert(disk.SerialNumber);
}
catch(e){
alert(e.message);
}
alert(disk.VolumeName);//取得卷标
}

0
0

查看评论
* 以上用户言论只代表其个人观点,不代表CSDN网站的观点或立场
    个人资料
    • 访问:1857535次
    • 积分:27213
    • 等级:
    • 排名:第220名
    • 原创:824篇
    • 转载:58篇
    • 译文:2篇
    • 评论:492条
    文章分类
    电子商务