07/10/26 02:54:59 L/PR486n0
janeview、janestyle用：規制議論への報告形式でURLをコピーするhta
使用方法：
seigi.htaという名前でjaneviewと同じフォルダに保存してcommand.datに↓のように記述する。
+報告書式でURLをコピー(&C)=mshta "$BASEPATHseigi.hta" $URL $NUMBER $LOCALDAT
======================================seigi.hta=====================================================
<html lang="ja"><head><meta http-equiv="Content-Type" content="text/html; charset=Shift_JIS">
<title>seigi</title><script type="text/jscript"><!--
while (1){ try{ resizeTo( 0, 0 ); break; } catch(e){} }
//--></script><HTA:APPLICATION id="hta" border="none" /><script type="text/jscript"><!--
var sCmdLine = hta.commandLine, sText;
if ( sCmdLine.indexOf('"') == 0 ) sCmdLine = sCmdLine.replace( /".+?" /,"" );
else sCmdLine = sCmdLine.replace( /^.+? /,"" );
var aCS = new Array();
aCS = sCmdLine.split(" ");
var sURL = aCS[0], nResNum = aCS[1];
var sDat = sCmdLine.replace(sURL + " " + nResNum + " ", "");
var sRes = new ActiveXObject("Scripting.FileSystemObject").OpenTextFile(sDat).ReadAll().split("\n")[nResNum-1];
var sResDate = sRes.split("<>")[2].replace(/\(.\)/, "").replace(/ BE\:.*$/, "");
clipboardData.setData("Text", sURL + nResNum + " " + sResDate + "\r\n");
close();
//--></script></head><body></body></html>