保存した場所のファイルをファイル名で検索するHTA

ファイルが1000以上あり、その中からファイル名を検索して内容を確認したり編集したりする事が良くあって
それをも少しどうにかならんもんか、と思いHTAでその簡略化に挑戦してみたなれの果てが下記のHTA。

下記の内容をHTAとして保存した場所の、サブフォルダを含めたファイルを検索するというもの。
内容の読み書きはShift-jisとやらだけだと思うので、さほど使えたもんでもないけれど
unDonutなどのソフトのフォルダに置いて、スクリプトやiniを編集するにはいいかも。

左上のインプット欄にファイル名を記入して検索。
webのand検索ってか!？、スペースを空けて検索するあれ、が可能。
リストに出るファイルのリストをクリックするか、キーで選択してEnterで右のtextareaにオープン。

５つのボタンはそれぞれ

[検索]検索を開始
[Editer]選択ファイルをエディターで開く（デフォルトはメモ帳、変更は99行目辺りの'notepad.exe'を\を\\にしたフルパスに）
[Open]ファイルを開く
[Wrap]右端で折り返しのon、off
[Run]関連付け実行
[CopyPath]パスをコピー
[Save]上書き保存

EditerとRunは右上に表示されているパスを実行。
あと、起動時はファイルを検索するのでファイル数が多いほどもたついてしまう。
<html> <head> <title>Search</title> <meta http-equiv="Content-Type" content="text/html; charset=shift_jis"> <meta http-equiv="Content-Style-Type" content="text/css"> <meta http-equiv="Content-Script-Type" content="text/javascript"> <hta:application id = "f_search" scroll = "no" /> <style type="text/css"> body { background: #555; margin : 2px; } * { -ms-word-wrap : break-word; -ms-word-break: break-all; word-wrap : break-word; word-break : break-all; } .body { width : 100%; height: 100%; } .left { width : 320px; height: 100%; float : left; color : #ff0; } .right { width : auto; height: 100%; float : right; } .left span, .right span { float : left; font-size: 80%; color : #ff0; padding : 3px 0; } .left input { width : 180px; background : #333; color : #fff; border : 1px solid #fff; letter-spacing: 1.5; padding : 0 5px; font-size : 100%; } #go { width: 80px; } .left select { width : 100%; height : 75%; background: #555; color : #0f0; font-size : 90%; } .left button { width : 105px; font-size : 90%; background: expression(document.activeElement == this ? 'yellow' : 'green'); color : expression(document.activeElement == this ? '#000' : '#ff0'); border : 3px outset #0f0; } #fpath { float : left; width : 90%; background : #222; border : 1px solid #fff; color : #0ff; padding : 0 2px; font-size : 90%; } #view { clear : both; width : 100%; height : 90%; background : #333; border : 1px solid #c0c0c0; letter-spacing: 1.5; line-height : 1.2; color : #fff; font-size : 90%; padding : 5px; overflow : auto; } #msg { position: absolute; top : 40%; left : 50%; font : bold 30px; color : #0ff; display : none; } </style> <script type="text/javascript"> var EDITER_PATH = 'notepad.exe'; //テキストエディタのパス(\は\\) var _fpath = ''; window.onload = function() { var fso = new ActiveXObject('scripting.filesystemobject'); var cur = unescape(fso.getparentfoldername(location.pathname)); var chkDir = getDir(fso, 1); var chkFil = getDir(fso); var arr_dir = chkDir(cur); var arr_fil = chkFil(cur); for (var s in arr_dir) arr_fil = chkFil(arr_dir[s]); fso = null; key.value = f_search.commandLine.split(/\s*"\s*/)[1] || ''; $('go').onclick = function() {searchFile(arr_fil)}; $('list').onchange = setPathName; $('open').onclick = fileOpen; $('edit').onclick = listRun; $('frun').onclick = listRun; $('pcopy').onclick = copyPath; $('wp').onclick = wrapSwitch; $('save').onclick = saveFile; $('view').onfocus = function() {$('fpath').innerText = _fpath}; $('list').onkeyup = function() {if (event.keyCode == 13) fileOpen()}; insTab($('view')); $('key').focus(); if ($('key').value) searchFile(arr_fil); }; function saveFile() { var fso = new ActiveXObject('scripting.filesystemobject'); try { var f_open = fso.opentextfile(_fpath, 2); f_open.write($('view').value); f_open.close(); autoDelMsg(fso.getfile(_fpath).name + '\nに上書きしました'); } catch(e) { autoDelMsg(e.message); } fso = null; $('view').focus(); }; function listRun() { var wss = new ActiveXObject('wscript.shell'); var dll32 = 'rundll32.exe url.dll,FileProtocolHandler '; var r_path = $('fpath').innerText; if (this.id == 'edit') { wss.exec('"' + EDITER_PATH + '" "' + r_path + '"'); } else { wss.run(dll32 + '"' + r_path + '"'); } wss = null; $('list').focus(); } function setPathName() {$('fpath').innerText = $('list').value}; function searchFile(arr_files) { var key_word = $('key').value; key_word = key_word.replace(/($|$|\[|\]|\{|\}|\+|\^|\.)/g, '\\$1').replace(/\s/g, '.*'); var reg = new RegExp(key_word, 'i'); var f_list = $('list').options; var i, f_name, cnt = 0; f_list.length = 0; for (i in arr_files) { f_name = arr_files[i].replace(/.*\\(.*)$/, '$1'); if (reg.test(f_name)) { f_list[cnt] = new Option(f_name, arr_files[i]); cnt ++; } } if (f_list.length == 0) { autoDelMsg('見つかりません'); $('key').focus(); } }; function fileOpen() { var fso = new ActiveXObject('scripting.filesystemobject'); var f_path = $('list').value; try { var f_open = fso.opentextfile(f_path); $('view').value = f_open.readall(); f_open.close(); _fpath = f_path; } catch(e) {}; fso = null; $('view').focus(); }; function copyPath() { clipboardData.setData('text', $('list').value); $('list').focus(); autoDelMsg('コピーしました'); }; function wrapSwitch() { var b_text = this.innerText; var b_str = (/on/i.test(b_text) ? 'OFF' : 'ON'); var w_str = (b_str == 'ON' ? 'normal' : 'break-word'); this.innerHTML = 'Wrap-' + b_str + '(<u>W</u>)'; $('view').style.wordWrap = w_str; $('view').focus(); }; function autoDelMsg(str) { var elm = $('msg'); var act = ['onclick', 'onkeydown']; elm.innerText = str; elm.style.display = 'block'; (function(_act) { setTimeout(function() { document.body[_act] = function() { elm.style.display = 'none'; for (var i in act) this[act[i]] = null; }; }, 500); if (/click/i.test(_act)) arguments.callee(act[1]); })(act[0]); }; function getDir(obj, f) { var _fso = obj; var arr_d = <span data-unlink>; var arr_f = </span>; var f_type = (f ? 'subfolders' : 'files'); return function(dir_path) { if (_fso.fileexists(dir_path)) return; var g_item = _fso.getfolder(dir_path)[f_type]; for (var er = new Enumerator(g_item); !er.atEnd(); er.moveNext()) { if (f) { arr_d.push(er.item().path); arguments.callee(er.item().path); } else { arr_f.push(er.item().path); } } return (f ? arr_d.sort() : arr_f.sort()); }; }; function insTab(elm) { elm.attachEvent('onkeydown', function(evt) { if (evt.keyCode == 9 && !evt.shiftKey && !evt.ctrlKey) { evt.returnValue = false; document.selection.createRange().text = '\t'; } }); }; function $(id) {return document.getElementById(id)}; </script> </head> <body> <div class=left> <span>↓(<u>A</u>) (<u>K</u>)</span><input id=key accesskey=k> <button id=go accesskey=g>Search(<u>G</u>)</button> <select id=list size=5 accesskey=a></select> <button id=open accesskey=o>Open(<u>O</u>)</button> <button id=edit accesskey=e>Editer(<u>E</u>)</button> <button id=frun accesskey=r>Run(<u>R</u>)</button> <button id=pcopy accesskey=c>CopyPath(<u>C</u>)</button> <button id=wp accesskey=w>Wrap-OFF(<u>W</u>)</button> <button id=save accesskey=s>Save(<u>S</u>)</button> </div> <div class=right> <div class=body> <div id=fpath></div> <span>↓(<u>V</u>)</span> <textarea id=view accesskey=v></textarea> <div id=msg></div> </div> </div> </body> </html>

8月26日 10:30 修正

余計なコードを消し忘れて関連付け実行がエラーになってた。

8月26日 17:00 修正

関連付け実行を右上に表示されているパスを実行するようにした。

9月23日修正

タブキーでタブスペース挿入に変更。

08/10/04 更新

あまりにも暇だったので一から書き直して気づいたけど、置いたディレクトリのパスに空白があるとエラーになってたｗ。location.pathnameで取得したらunescapeしなきゃダメみたい。