【自作】Sleipnir別ブラウザ表示スクリプトインストーラ 「exBrowserSleipnir」

この投稿で書いた、
Sleipnirでのアクティブページを別のブラウザで開くスクリプトを、
ダウンロードしインストールする、インストーラを作成しました。
その名も「exBrowserSleipnir」。
以下からダウンロード及び実行出来ます。
詳しい利用方法は、zip内の「Readme.txt」を参照して下さい。
exBrowserSleipnir Ver1.00 ダウンロード
exBrowserSleipnir_v100.zip
直接起動はこちら。
exBrowserSleipnir.vbs

この投稿で書いていたのはFirefoxに関してですが、
このインストーラを利用すると、Chrome用も同時にインストールされます。
当然、Sleipnir及びFirefox、Chromeがインストールされていない場合、
エラーと共に終了することになります。
主に自分用なので、細かなエラーチェックもしていないのが特色(？)です。

インストーラを実行し終了した後、「スクリプトの再読み込み」を行うと、
「スクリプト」内へ以下の様に表示されます。

Sleipnir APIを利用したアクティブページ別ブラウザ表示

Sleipnirを利用している人には分かることなのですが、
標準でいくつかのスクリプトが用意されています。
その中には、内部でSleipnirAPIを使用しているモノもあります。
SleipnirAPIに関してはこちら。
タブブラウザ Sleipnir オンラインデータベース(Sleipnir.API リファレンス)

で。
SleipnirAPIを利用して、アクティブページのURLを取得し、
別のブラウザで表示するスクリプトを作成したので、以下にまとめます。

まずはソースを。
そんなに難しい内容ではないです。
' ******************************************************
' FirefoxでSleipnirアクティブページを表示
' ******************************************************
Option Explicit

Dim Pnir, WshShell, Url

' SleipnirAPI呼び出し
Set Pnir = CreateObject("Sleipnir.API")

' 現在開いているページのURL取得
Url = "firefox "
Url = Url & Pnir.URL

' 非同期で呼び出し
Set WshShell = WScript.CreateObject("WScript.Shell")
Call WshShell.Run( Url )
ソースはFirefoxで開いていますが、Chromeでも確認済です。
「名前を指定して実行」出来るブラウザに対してはいけるはずです。
ブラウザを変える場合には、12行目のブラウザ名を変更してください。

以下が使用準備・方法となります。


Sleipnirのメニューバー「スクリプト」内のスクリプトが実行出来ない場合は、
「ツール」→「Sleipnirオプション内」から、
スクリプト実行を許可する必要があります。


スクリプトが利用できるようになると、
「スクリプト」内の「スクリプトの整理」を選択できるようになるので選択。


Sleipnirのスクリプトディレクトリが表示されるので、
「Firefoxで開く.vbs」を作成し、上のソースをそのまま貼り付けて保存。


Sleipnirに戻り、先ほど作成したスクリプトファイルを表示するために、
「スクリプト」内の「スクリプトの再読み込み」を行います。


「Firefoxで開く.vbs」が表示されるので選択。
Sleipnirで開いているページが、Firefoxで表示されれば完了です。

なお、当然ながらFirefoxで開くので、
インストールされていない場合にはエラーが発生します。
何しろエラーチェックしていないもので・・・。

Firefoxも表示対応しました

※追記：「FireFox」→「Firefox」に修正しました。
ずっと前からわかっていたことで、直していなかったことがありました。
それは「Firefoxでの＜pre＞表示が正常でない」ことです。
なんとも、FirefoxではIEなどと違う動作をし、表示幅ギリギリで改行してくれないのです。

ですので、ひとまずGoogleで検索しました。
Mint's log: preタグの中身がFirefoxで改行されない
そのまま真似してみると、なんとまぁ出来ました。

たったこれだけなら早めにしておいたらよかったです。
地味にFirefoxでも見てもらえているみたいなので。