08/02/15 00:27:52 ypLq6hqs0
（転載です）某SNSの保存用
適当にメモ帳に貼り付けて、拡張子をjsに変更すれば使えます。
出来たスクリプトファイル(js)をダブルクリックすると
今開いてるIEのページをすべてテキストファイルに書き出します。
var objFS = new ActiveXObject("Scripting.FileSystemObject");
var Shell = WScript.CreateObject("Shell.Application");
var objShells = Shell.Windows();
for(var i = 0; i < objShells.Count; i++)
{
var fullname = "";
try
{
fullname = objShells.item(i).FullName;
if(fullname.match(/iexplore.exe$/i))
{
var ie = objShells.item(i).document;
var url = ie.parentWindow.location.href;
// WScript.Echo(url);
// 適当に整形
url = url.split("/").pop();
url = url.replace(/\?/g,"");
url = url.replace(/=/g,"");
url = url.replace(/[&+]/g," ");
// ファイル出力
var objOut = objFS.CreateTextFile(url+".txt",true);
objOut.Write(ie.body.innerText);
objOut.Close();
// WScript.Echo(ie.body.innerText);
}
}
catch(e)
{
}
}
全自動にするとサーバー負荷とかエラーチェックなどの問題があるので、手動で