腳本寫的IE右鍵助手

更新時(shí)間：2006年07月20日 00:00:00 作者：

//原作者：張三瘋 //功能改進(jìn)：海娃(51windows) //http://www.51windows.Net //設(shè)置文本保存的默認(rèn)目錄,注意：程序不能創(chuàng)建二級(jí)目錄 var fdir="D:\\\\MyCode"; var fsdir=fdir.replace(/\\\\/g,"\\"); var fdrive = fdir.substring(0,1); var fsubdir = fdir.substring(4,fdir.length); //以下內(nèi)容不需更改 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=/(\/|:|\*|\?|"|\<|\>|\|)/; //如果沒有指定的驅(qū)動(dòng)器,或者驅(qū)動(dòng)器類型不是硬盤,或者目錄名包含非法字符.則彈出錯(cuò)誤信息 if (!fso.DriveExists(fdrive) || d.DriveType!=2 || errorChar.test(fsubdir))  {WSHShell.Popup("文本保存目錄錯(cuò)誤,請(qǐng)重新設(shè)置文本保存目錄.");} 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('//功能改進(jìn)：海娃(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("請(qǐng)先選擇一段要保存的文字!");'); 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(加擴(kuò)展名).",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已經(jīng)存在,要替換它嗎?"))'); 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("請(qǐng)先選擇一段要搜索的文字!");}'); 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("請(qǐng)先選擇一個(gè)網(wǎng)址!");}'); 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\\藍(lán)色理想(&B)\\",fb); WSHShell.RegWrite("HKCU\\Software\\Microsoft\\Internet Explorer\\MenuExt\\保存所選文本(&S)\\",fn); WSHShell.RegWrite("HKCU\\Software\\Microsoft\\Internet Explorer\\MenuExt\\打開網(wǎng)址(&U)\\",fu); WSHShell.RegWrite("HKCU\\Software\\Microsoft\\Internet Explorer\\MenuExt\\Google搜索\\",fs); WSHShell.Popup("SaveText 安裝成功!!!\n默認(rèn)的文本保存目錄為 " + fsdir); }

[Ctrl+A 全選注:引入外部Js需再刷新一下頁面才能執(zhí)行]

安裝方法:下載到本地，雙擊，如果安裝成功，系統(tǒng)會(huì)彈出成功的對(duì)話框！
功能簡介:
1、右鍵加入幾個(gè)網(wǎng)站的鏈接
2、可以打開　沒有鏈接的網(wǎng)址
3、選定一段文本后，可以保存，并將網(wǎng)頁地址記錄
4、選定幾個(gè)文字后，在google上搜索

可能存在的問題：

程序會(huì)自動(dòng)在D盤建立文件夾Mycode，如果你的電腦只有一個(gè)分區(qū)，請(qǐng)改一下，當(dāng)然你也可以改為其它的盤上！

程序會(huì)改動(dòng)注冊(cè)表，一些軟件可能會(huì)有“病毒”信息提示！這樣你可以暫時(shí)關(guān)閉程序來安裝！

如果不再想用這些功能，請(qǐng)?jiān)谧?cè)表中刪除！
在運(yùn)行中輸入:regedit
找到
[HKEY_CURRENT_USER\Software\Microsoft\Internet Explorer\MenuExt\

把相關(guān)的信息刪除！

卸載文件

[Ctrl+A 全選注:引入外部Js需再刷新一下頁面才能執(zhí)行]

圖示：