EmEditorで外部HTMLヘルプ呼び出し

ちょっとEmEditorに浮気中。
サクラエディタだと拡張子ごとの設定で外部HTMLヘルプの登録(タイプ別設定→支援のタブ→外部HTMLヘルプの設定)ができるので、設定しておけばF1で一発表示なのですが、ちなみに秀丸さんの場合は拡張子毎とはいかないようですが設定しておけば(動作環境の設定→その他コマンド→外部ヘルプ)でCTRL+F1で呼び出し可能です。
EmEditorの場合は。。。。もしかして付いてない???
エディタ/VWD2005(Windows Script Wiki)勝手にリンクごめんなさい
ぐぐってるといい感じのスクリプトをはっけん(–+
上のサイトのものそのままですが、


' HTMLヘルプを開き、単語を検索する
'
' *セットアップ
' -このファイル(OpenVBSHelp.vbs)をローカルにコピー
' -メモ帳等でこのファイルを開き、Const HelpFile = ""に
' VBScriptのヘルプファイルをフルパスで指定する
'
' *使い方
' wscript.exe OpenVBSHelp.vbs [検索したいキーワード]
'
' *トラブルシューティング
' -文字入力を取りこぼすようならWaitTimeMSの値を増やす
'
Const WindowTitle = "PHP Manual"
Const HelpFilePath = "適当にパスをいれてください\php_manual_ja.chm"
'Const HelpFilePath = "C:\Program Files\Microsoft Windows Script\ScriptDocs\Script56.CHM"
Const WaitTimeMS = 200
dim searchword
searchword = ""
if WScript.Arguments.Count = 1 then
searchword = WScript.Arguments(0)
end if
set ws = WScript.CreateObject("WScript.Shell")
ws.Run "cmd.exe /c /start /min taskkill.exe /fi " & Chr(34) & "Windowtitle eq " & WindowTitle & Chr(34)
ws.Run HelpFilePath, 1, False
WScript.Sleep WaitTimeMS*2
ws.SendKeys "%n"
WScript.Sleep WaitTimeMS
ws.SendKeys searchword
WScript.Sleep WaitTimeMS
ws.SendKeys "{ENTER}"

でこれを「OpenVBSHelp.vbs」とでもしてマクロフォルダへ保存して
外部ツールへの設定へ
コマンド
マクロへのパス\OpenVBSHelp.vbs
引数
$(CurText)
としてやれば、外部ツールの呼び出しで選択している単語を外部HTMLヘルプから検索した結果表示できます。
単に外部ヘルプが開けばいいのであれば「hh.exe php_manual_ja.chm」でもできます。

カテゴリー blog

コメントを残す

メールアドレスが公開されることはありません。 が付いている欄は必須項目です

CAPTCHA