學習指令碼離不開借鑒...
在這裡提供一個工具，原創的。請大家善用之。
Temporary Internet Files檔案批量改名工具，用來提取網頁緩衝。
<head> <meta http-equiv=Content-Type content="text/html; charset=GB2312"> <title>Temporary Internet Files檔案批量改名工具(示範版)</title> <script> function killErrors() {this.location.href="error.htm"} //window.onerror = killErrors var fso = new ActiveXObject("Scripting.FileSystemObject") function comes(tms){ //var simn = fle.value.split("\\") //var patu="",sh=0 // for (var i=0;i<(simn.length-1);i++) { // patu+=simn[i]+'\\'} ww=fle.value patu=ww.substr(0,ww.lastIndexOf("\\")) nu=0 if(patu==""){alert("請選擇要改名的檔案。") return false} try{sr = fso.GetFolder(patu) fc = new Enumerator(sr.files) if(tms==0)for (; !fc.atEnd(); fc.moveNext()) {x=fc.item().Name k=x.lastIndexOf(".") if(k==-1){k=x.lastIndexOf("[1]") if(k==x.length-3&&k>0){fc.item().Name=x.substr(0,k) nu++}} else{v=x.lastIndexOf("[1]") if(v==k-3&&v>0){a=x.substr(0,v) b=x.substr(k) fc.item().Name=a+b nu++}}} if(tms==1)for (; !fc.atEnd(); fc.moveNext()) {x=fc.item().Name k=x.lastIndexOf(".") if(k>-1){if(x.substr(k)==".htm"){fc.item().Name=x.substr(0,k)+".html" nu++}} } alert(nu+"個檔案改名成功。") } catch(e){var str="" if(typeof(x)!="undefined")str+="正在操作的檔案："+patu+"\\"+x+"\n\n" for(i in e){str+=i+":"+eval('e.'+i)+"\n"} alert(str+"\n請按使用說明操作。") alert(nu+"個檔案改名成功。")} } </script> </head> <body bgcolor=#cccccc> <input type="file" name="fle"> <center> <button onclick=comes(0)><font size=7><b>改名:*[1].* → *.*</b></font></button> <p><button onclick=comes(1)><font size=7><b>改名:*.htm → *.html</b></font></button> <p><font size=10 color=red><b>Pansoft<sup>®</sup>泛軟</font></b>北京泛軟工作室</center> <p><font size=2>使用說明： 1.將網頁緩衝內容(一般位於"C:\Documents and Settings\...\Local Settings\Temporary Internet Files")按照正確的路徑階層儲存到檔案夾中。 2.點"瀏覽…(Browse...)"按鈕，找到欲操作的檔案夾，選定其中任意一個檔案。 3.點"改名"按鈕。<center> <p>說明：這是一個未完成的示範板，其目的在於徵求意見，簡陋之處，悉請見諒。 有關使用問題，請向作者詢問。 <p> <p><i>粗製於2002.11.26.21:57 <p>補記：正式版本已具雛形，但尚未完工。(2003.7.30)
[Ctrl+A 全選 注:如需引入外部Js需重新整理才能執行]
