下载地址:脚本文件
//原作者:张三疯
//功能改进:海娃(51windows)
//http://www.51windows.Net
//设置文本保存的默认目录,注意:程序不能创建二级目录
var fdir="D:\\MyCode";
var fsdir=fdir.replace(/\\/g,"\");
var fdrive = fdir.substring(0,1);
var fsubdir = fdir.substring(4,fdir.length);
//以下内容不需更改
var fso, d, fl, fn, fo,foo,fs,fss,windir, WSHShell,fw,fww;
fso = new ActiveXObject("Scripting.FileSystemObject");
d = fso.GetDrive(fdrive);
WSHShell = WScript.CreateObject("WScript.Shell");
var errorChar=/(/|:|*|?|"|||)/;
//如果没有指定的驱动器,或者驱动器类型不是硬盘,或者目录名包含非法字符.则弹出错误信息
if (!fso.DriveExists(fdrive) || d.DriveType!=2 || errorChar.test(fsubdir))
{WSHShell.Popup("文本保存目录错误,请重新设置文本保存目录.");}
else
{
if (!fso.FolderExists(fsdir))
{fso.CreateFolder(fsdir);}
windir=fso.GetSpecialFolder(0);
fn=windir+"\savetext.htm";
fl = fso.CreateTextFile(fn,true);
fl.WriteLine('');
fl.Close();
fo= windir+"\openfolder.htm";
foo = fso.CreateTextFile(fo,true);
foo.WriteLine('');
foo.Close();
fw= windir+"\51windows.htm";
fww = fso.CreateTextFile(fw,true);
fww.WriteLine('');
fww.Close();
var fb,fbb;
fb= windir+"\blueidea.htm";
fbb = fso.CreateTextFile(fb,true);
fbb.WriteLine('');
fbb.Close();
var fc,fbc;
fc= windir+"\csdn.htm";
fcc = fso.CreateTextFile(fc,true);
fcc.WriteLine('');
fcc.Close();
fs=windir+"\google.htm";
fss = fso.CreateTextFile(fs,true);
fss.WriteLine('');
fss.Close();
fu=windir+"\link.htm";
fuu = fso.CreateTextFile(fu,true);
fuu.WriteLine('');
fuu.Close();
WSHShell.RegWrite("HKCU\Software\Microsoft\Internet Explorer\MenuExt\打开代码文件夹(&Z)\",fo);
WSHShell.RegWrite("HKCU\Software\Microsoft\Internet Explorer\MenuExt\51windows.Net(&Q)\",fw);
WSHShell.RegWrite("HKCU\Software\Microsoft\Internet Explorer\MenuExt\CSDN(&C)\",fc);
WSHShell.RegWrite("HKCU\Software\Microsoft\Internet Explorer\MenuExt\蓝色理想(&B)\",fb);
WSHShell.RegWrite("HKCU\Software\Microsoft\Internet Explorer\MenuExt\保存所选文本(&S)\",fn);
WSHShell.RegWrite("HKCU\Software\Microsoft\Internet Explorer\MenuExt\打开网址(&U)\",fu);
WSHShell.RegWrite("HKCU\Software\Microsoft\Internet Explorer\MenuExt\Google搜索\",fs);
WSHShell.Popup("SaveText 安装成功!!!n默认的文本保存目录为 " + fsdir);
}
[Ctrl+A 全选 注:如需引入外部Js需刷新才能执行]安装方法:下载到本地,双击,如果安装成功,系统会弹出成功的对话框!功能简介:1、右键加入几个网站的链接2、可以打开 没有链接的网址3、选定一段文本后,可以保存,并将网页地址记录4、选定几个文字后,在google上搜索可能存在的问题:程序会自动在D盘建立文件夹Mycode,如果你的电脑只有一个分区,请改一下,当然你也可以改为其它的盘上!程序会改动注册表,一些软件可能会有“病毒”信息提示!这样你可以暂时关闭程序来安装!如果不再想用这些功能,请在注册表中删除!在运行中输入:regedit找到[HKEY_CURRENT_USERSoftwareMicrosoftInternet ExplorerMenuExt把相关的信息删除!
卸载文件
WSHShell = WScript.CreateObject("WScript.Shell");
try{
WSHShell.RegDelete("HKCU\Software\Microsoft\Internet Explorer\MenuExt\打开代码文件夹(&Z)\");
WSHShell.RegDelete("HKCU\Software\Microsoft\Internet Explorer\MenuExt\51windows.Net(&Q)\");
WSHShell.RegDelete("HKCU\Software\Microsoft\Internet Explorer\MenuExt\CSDN(&C)\");
WSHShell.RegDelete("HKCU\Software\Microsoft\Internet Explorer\MenuExt\蓝色理想(&B)\");
WSHShell.RegDelete("HKCU\Software\Microsoft\Internet Explorer\MenuExt\保存所选文本(&S)\");
WSHShell.RegDelete("HKCU\Software\Microsoft\Internet Explorer\MenuExt\打开网址(&U)\");
WSHShell.RegDelete("HKCU\Software\Microsoft\Internet Explorer\MenuExt\Google搜索\");
uninstalled = true
}
catch(e){
}
WSHShell.Popup("删除安装成功,请打开一个新的IE窗口查看")
[Ctrl+A 全选 注:如需引入外部Js需刷新才能执行]
图示:
推荐阅读
[JS]点出统计器
ff 默认不让改 status opera9 测试通过 ie6 测试通过 这东西是给统计部门用的,分析用户习惯以改良网站布局。 只是写着玩的小东西,所以很多地方不太理想。 save() 方法是保存记录的,没仔细做,应该再加>>>详细阅读
本文标题:脚本写的IE右键助手
地址:http://www.17bianji.com/kaifa2/JS/31661.html
1/2 1