ビューティーラボ

2007年03月29日 [その他スクリプト] TeraPadっぽくブラウザプレビュー動作をする秀丸マクロ このあいだ、7年使ったTeraPadから秀丸に乗り換え、最初に書いたマクロ。 //Sleipnirでプレビュー if (updated) { question "上書き保存していいですか？";     if (result == 1) {         save;     } else {         endmacro;     } } run "¥"C:¥¥Program Files¥¥Fenrir & Co¥¥Sleipnir¥¥bin¥¥Sleipnir.exe¥" ¥"%f¥""; ブラウザのフルパスを書き換えればFirefoxでもOperaでも何でも。 HTMLファイルをブラウザで開くマクロをいろいろ探したんだけど、TeraPadっぽく「編集中なら上書き確認してからプレビュー」という動作をしてくれるマクロが見つからず、しかもなんか検索でひっかかるものが大袈裟なマクロばっかりだったので、自分で調べながら書いてみた。人様に見せるとなれば、やっぱり作り込んで大袈裟になっていくのだろう。でも俺はこれで十分。

2007年03月25日 [WSH] ファイルをひとつ上の階層へ移動 Set Fso = CreateObject("Scripting.FileSystemObject") Set Arg = WScript.Arguments For i = 0 to Arg.Count - 1   Fso.MoveFile Arg(i),Fso.GetParentFolderName(Fso.GetParentFolderName(Arg(i))) & "¥" & Fso.GetFileName(Arg(i)) Next 上記のコードをコピーして、SendToフォルダに「1つ上へ.vbs」みたいな名前で保存しておくと、ファイルの右クリックメニュー「送る」で、ファイルを一階層上へ移動できるようになる。 このサイトは、こういう感じで、例外処理を万全にしたりかっこいい方法を考えたりすることなく、「自分の手元でだけ動けばいい」と思って書いたような、完成度の低いスクリプトとかを貼ったりする場所にしようと思う。それが俺のラボ。

△ PAGE TOP