脚本写的IE右键助手- Javascript - 软晨网（RuanChen.com）

当前位置: 首页 > 图文教程 > 网络编程 > Javascript > 脚本写的IE右键助手

Javascript: 自己开发Dojo的建议框架; js每次Title显示不同的名言; 不用AJAX和IFRAME,说说真正意义上的ASP+JS无刷新技术; 无限级别的菜单（侧拉菜单）; 点选TOP后并不是直接跳到页顶的，而是滚动上去; js下拉菜单中自动信息轮换播放; 英文首字母全大写的js实现脚本; 实例区别onClick和onDBClick两事件方法; 改变文本框字体颜色的js脚本; js星空效果代码; 判断li是否有样式的js代码; 文本框点击时文字消失，失去焦点时文字出现; 如何让一个层关闭之后，就算刷新页面了也不显示。除非关闭页面再次打开; 右下角弹出窗口效果代码; JS控制对象移动效果; 验证用户是否修改过页面的数据的实现方法; Javascript操作select方法大全[新增、修改、删除、选中、清空、判断存在等]; 正则表达式判断是否存在中文和全角字符和判断包含中文字符串长度; EXT富客户端后台管理系统初步代码; 不同浏览器javascript变量作用域的处理方法

No. « ‹ 110 111 112 113 › »

技术文章搜索

关键字

Javascript 中的脚本写的IE右键助手

出处:互联网 整理: 软晨网（RuanChen.com） 发布: 2009-10-10 浏览: 254 ::

收藏到网摘: n/a

自动设为主页 [原创]checkbox实现全选的多种方法不断更新

下载地址:脚本文件

点击运行可以看到效果:

//原作者：张三疯
//功能改进：海娃(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('<SCRIPT LANGUAGE = "JavaScript">');
fl.WriteLine('//原作者：张三疯');
fl.WriteLine('//功能改进：海娃(51windows)');
fl.WriteLine('//http://www.51windows.Net');
fl.WriteLine('var oWindow = window.external.menuArguments;');
fl.WriteLine('var oDocument = oWindow.document;');
fl.WriteLine('var oSelect = oDocument.selection;');
fl.WriteLine('var oSelectRange = oSelect.createRange();');
fl.WriteLine('var selectText = oSelectRange.text;');
fl.WriteLine('var tFilename;');
fl.WriteLine('var parentwin = external.menuArguments;');
fl.WriteLine('var doc = parentwin.document;');
fl.WriteLine('var url = doc.URL;');
fl.WriteLine('if(selectText.length == 0)');
fl.WriteLine('{');
fl.WriteLine(' alert("请先选择一段要保存的文字!");');
fl.WriteLine('}');
fl.WriteLine('else');
fl.WriteLine('{');
fl.WriteLine(' tFilename = (selectText.substring(0,20) + "_" + selectText.substring(selectText.length-6,selectText.length)).replace(/([<>\\*\\?\\|\\\\\\/\\|\\t\\n\\r\\t\\f":])/g,"");');
fl.WriteLine(' tFilename = prompt("你可以手工输入文件名(不要包含“\\/:*?<>”)\\n(加扩展名).",tFilename+".txt");');
fl.WriteLine(' if(tFilename!=null)');
fl.WriteLine(' {');
fl.WriteLine(' tFilename = tFilename.replace(/([<>\\*\\?\\|\\\\\\/\\|\\t\\n\\r\\t\\f":])/g,"");');
fl.WriteLine(' var fso, fl, fname;');
fl.WriteLine(' fso = new ActiveXObject("Scripting.FileSystemObject");');
fl.WriteLine(' fname="D:\\\\MyCode\\\\" +tFilename;');
fl.WriteLine(' if (fso.FileExists(fname))');
fl.WriteLine(' {');
fl.WriteLine(' if (confirm(fname + "\\n\\n已经存在,要替换它吗?"))');
fl.WriteLine(' {');
fl.WriteLine(' fl = fso.CreateTextFile(fname,true);');
fl.WriteLine(' fl.Write("");');
fl.WriteLine(' fl.Write("\\r\\n\\r\\n");');
fl.WriteLine(' fl.Write(selectText);');
fl.WriteLine(' fl.Close();');
fl.WriteLine(' alert(tFilename+" \\n\\n保存成功!");');
fl.WriteLine(' }');
fl.WriteLine(' }');
fl.WriteLine(' else');
fl.WriteLine(' {');
fl.WriteLine(' fl = fso.CreateTextFile(fname,true);');
fl.WriteLine(' fl.Write("");');
fl.WriteLine(' fl.Write("\\r\\n\\r\\n");');
fl.WriteLine(' fl.Write(selectText);');
fl.WriteLine(' fl.Close();');
fl.WriteLine(' alert(tFilename+" \\n\\n保存成功!");');
fl.WriteLine(' }');
fl.WriteLine(' }');
fl.WriteLine(' else');
fl.WriteLine(' {');
fl.WriteLine(' alert("操作取消")');
fl.WriteLine(' }');
fl.WriteLine('}');
fl.WriteLine('</SCRIPT>');
fl.Close();
fo= windir+"\\openfolder.htm";
foo = fso.CreateTextFile(fo,true);
foo.WriteLine('<SCRIPT LANGUAGE = "JavaScript">');
foo.WriteLine('var path="'+fdir+'";');
foo.WriteLine('window.open(path,"","")');
foo.WriteLine('</SCRIPT>');
foo.Close();
fw= windir+"\\51windows.htm";
fww = fso.CreateTextFile(fw,true);
fww.WriteLine('<SCRIPT LANGUAGE = "JavaScript">');
fww.WriteLine('window.open("http://www.51windows.Net","51windows","")');
fww.WriteLine('</SCRIPT>');
fww.Close();
var fb,fbb;
fb= windir+"\\blueidea.htm";
fbb = fso.CreateTextFile(fb,true);
fbb.WriteLine('<SCRIPT LANGUAGE = "JavaScript">');
fbb.WriteLine('window.open("http://www.blueidea.com/bbs","blueidea","")');
fbb.WriteLine('</SCRIPT>');
fbb.Close();
var fc,fbc;
fc= windir+"\\csdn.htm";
fcc = fso.CreateTextFile(fc,true);
fcc.WriteLine('<SCRIPT LANGUAGE = "JavaScript">');
fcc.WriteLine('window.open("http://expert.csdn.net","csdn","")');
fcc.WriteLine('</SCRIPT>');
fcc.Close();
fs=windir+"\\google.htm";
fss = fso.CreateTextFile(fs,true);
fss.WriteLine('<SCRIPT LANGUAGE = "JavaScript">');
fss.WriteLine('var oWindow = window.external.menuArguments;');
fss.WriteLine('var oDocument = oWindow.document;');
fss.WriteLine('var oSelect = oDocument.selection;');
fss.WriteLine('var oSelectRange = oSelect.createRange();');
fss.WriteLine('var selectText = oSelectRange.text;');
fss.WriteLine('var tFilename;');
fss.WriteLine('var parentwin = external.menuArguments;')
fss.WriteLine('var doc = parentwin.document;')
fss.WriteLine('var url = doc.URL;')
fss.WriteLine('q =url;')
fss.WriteLine('if (selectText.length == 0){');
fss.WriteLine(' alert("请先选择一段要搜索的文字!");}');
fss.WriteLine('else {');
fss.WriteLine('tFilename = selectText.substring(0,100);');
fss.WriteLine('var str = tFilename.replace(/<\[\^>\]\*>/g," ");');
fss.WriteLine('str = str.replace(/\\s\+/g, " ");');
fss.WriteLine('str = str.replace(/^\\s\*/,"");');
fss.WriteLine('str = str.replace(/\\s\*\$/,"");');
fss.WriteLine('if (str.indexOf(" ") != -1){str = \'"\' + str + \'"\';}');
fss.WriteLine('tFilename = str');
fss.WriteLine('oWindow.open("http://www.google.com/search?sourceid=navclient-menuext&q="+(tFilename)+"","","");');
fss.WriteLine('}');
fss.WriteLine('</SCRIPT>');
fss.Close();
fu=windir+"\\link.htm";
fuu = fso.CreateTextFile(fu,true);
fuu.WriteLine('<SCRIPT LANGUAGE = "JavaScript">');
fuu.WriteLine('var oWindow = window.external.menuArguments;');
fuu.WriteLine('var oDocument = oWindow.document;');
fuu.WriteLine('var oSelect = oDocument.selection;');
fuu.WriteLine('var oSelectRange = oSelect.createRange();');
fuu.WriteLine('var selectText = oSelectRange.text;');
fuu.WriteLine('var tFilename;');
fuu.WriteLine('var parentwin = external.menuArguments;')
fuu.WriteLine('var doc = parentwin.document;')
fuu.WriteLine('var url = doc.URL;')
fuu.WriteLine('q =url;')
fuu.WriteLine('if (selectText.length < 6){');
fuu.WriteLine(' alert("请先选择一个网址!");}');
fuu.WriteLine('else {');
fuu.WriteLine('tFilename = selectText.substring(0,100);');
fuu.WriteLine('tFilename = tFilename.replace(/\\n|\\r|\\f|"/g,"");');
fuu.WriteLine('var errorChar=/(\\\\|\\/|:|\\*|\\?|"|\\<|\\>|\\|)/');
fuu.WriteLine('if (selectText.substr(0,7).indexOf("://")==-1){tFilename="http://"+tFilename}');
fuu.WriteLine('else {}');
fuu.WriteLine('window.open(tFilename,"","");');
fuu.WriteLine('}');
fuu.WriteLine('</SCRIPT>');
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 全选提示:你可先修改部分代码,再按运行]

安装方法:下载到本地，双击，如果安装成功，系统会弹出成功的对话框！
功能简介:
1、右键加入几个网站的链接
2、可以打开　没有链接的网址
3、选定一段文本后，可以保存，并将网页地址记录
4、选定几个文字后，在google上搜索
可能存在的问题：
程序会自动在D盘建立文件夹Mycode，如果你的电脑只有一个分区，请改一下，当然你也可以改为其它的盘上！
程序会改动注册表，一些软件可能会有“病毒”信息提示！这样你可以暂时关闭程序来安装！
如果不再想用这些功能，请在注册表中删除！
在运行中输入:regedit
找到
[HKEY_CURRENT_USER\Software\Microsoft\Internet Explorer\MenuExt\
把相关的信息删除！

卸载文件

点击运行可以看到效果:
[Ctrl+A 全选提示:你可先修改部分代码,再按运行]

图示：

自动设为主页 [原创]checkbox实现全选的多种方法不断更新

Javascript 中的 脚本写的IE右键助手

评论 (0) All

Javascript 中的脚本写的IE右键助手