WScriptの呪縛を解け：WScript.FullNameによる「実行環境の強制」とプロフェッショナルなブートストラップ設計
業務自動化の現場において、VBScriptは今なお強力な武器だ。しかし、多くの「素人エンジニア」が作成したスクリプトは、実行環境の制御をユーザーの「ダブルクリック」という不確実な挙動に委ねている。
その結果、何が起きるか？
コンソール出力を期待して `WScript.Echo` を書き込んだにもかかわらず、実行した瞬間にダイアログボックスが次々とポップアップし、ユーザーの作業を妨害する。あるいは、標準出力（Stdout）を利用した後続のバッチ処理が、何も受け取れずに沈黙する。
これは「設計の敗北」だ。プロフェッショナルなら、スクリプトがどのような環境で起動されようとも、自らの意志で「CScript（コンソール実行環境）」へ強制的に遷移させる必要がある。
本稿では、`WScript.FullName` を駆使した、堅牢なブートストラップ（起動プロセス）の実装手法を伝授する。
1. なぜ「環境の強制」が必要なのか
Windows Script Host (WSH) には、大きく分けて2つの実行エンジンが存在する。
1. WScript.exe (Windows-based): GUIベース。`WScript.Echo` はダイアログボックスとして表示される。
2. CScript.exe (Console-based): コマンドラインベース。`WScript.Echo` は標準出力（コンソール）へ流れる。
業務ツールにおいて、ログをコンソールに流し、進捗をリアルタイムに表示し、あるいはパイプライン経由で他のツールにデータを渡す設計にする場合、WScript.exeでの実行は「エラー」と同義である。
「ユーザーにCScriptで実行するようにマニュアルを書く」？ そんなものはプロの仕事ではない。スクリプト自身が、自らの出自を判定し、正しい環境へ自己再起動（Self-Restart）しなければならないのだ。
2. 核心となるロジック：WScript.FullName の活用
ここで鍵となるのが `WScript.FullName` プロパティだ。これは、現在スクリプトを動かしているホスト・エンジンのフルパスを返す。
このパスの中に `cscript.exe` という文字列が含まれているかどうかを判定することで、現在の実行環境を瞬時に特定できる。
判定のアルゴリズム
1. `WScript.FullName` を取得する。
2. その中に `cscript.exe` が含まれていなければ、それは `wscript.exe` であると断定する。
3. `WScript.Shell` オブジェクトを用い、`cscript.exe [現在のスクリプトパス] [元の引数]` というコマンドを組み立てて実行する。
4. 現在のプロセスを即座に終了（`WScript.Quit`）させる。
ここで重要なのは、「元の引数（Arguments）を完全に引き継ぐ」ことだ。これを怠ると、再起動後のスクリプトは引数不足で即死する。
3. プロダクションクオリティのコード実装
以下に、そのまま業務に投入できるレベルのブートストラップ・テンプレートを示す。単なる再起動コードではなく、エラーハンドリングと引数の継承を考慮した設計にしている。
' ==============================================================================
' Script Name: Bootstrap_Template.vbs
' Description: WScript実行時にCScriptへ自動強制再起動する堅牢なテンプレート
' Author: Chief Architect
' ==============================================================================
Option Explicit
' ------------------------------------------------------------------------------
' メインエントリーポイント
' ------------------------------------------------------------------------------
Call Main()
Sub Main()
' 1. 環境の強制（ブートストラップ）
' これを呼び出すことで、WScript環境であればCScriptへ再起動し、
' 成功すれば以降の処理がCScript上で継続される。
Call EnsureCScript()
' --- ここから下に本来のロジックを記述する ---
WScript.Echo "--------------------------------------------------"
WScript.Echo "Execution Environment: " & WScript.FullName
WScript.Echo "Status: Success"
WScript.Echo "--------------------------------------------------"
' 引数の処理例
If WScript.Arguments.Count > 0 Then
WScript.Echo "Arguments received:"
Dim i
For i = 0 To WScript.Arguments.Count - 1
WScript.Echo " [" & i & "]: " & WScript.Arguments(i)
Next
Else
WScript.Echo "No arguments provided."
End If
' 業務ロジックのシミュレーション
WScript.Echo "Processing data..."
WScript.Sleep 1000
WScript.Echo "Task completed successfully."
End Sub
' ------------------------------------------------------------------------------
' Function: EnsureCScript
' Purpose: 実行環境がCScriptであることを保証する
' ------------------------------------------------------------------------------
Sub EnsureCScript()
Dim strHost, objShell, strCommand, strArgs, i
strHost = LCase(WScript.FullName)
' CScript.exe が含まれていない場合（＝WScript.exe で実行されている場合）
If InStr(strHost, "cscript.exe") = 0 Then
Set objShell = CreateObject("WScript.Shell")
' 引数の組み立て（元の引数をすべて再構築する）
strArgs = ""
For i = 0 To WScript.Arguments.Count - 1
' 引数にスペースが含まれる場合を考慮し、ダブルクォーテーションで囲む
strArgs = strArgs & " """ & WScript.Arguments(i) & """"
Next
' 再起動コマンドの構築
' cscript.exe "現在のスクリプトパス" [元の引数]
strCommand = "cscript.exe //nologo """ & WScript.ScriptFullName & """" & strArgs
' 新しいプロセスを起動
' 0: ウィンドウを非表示にする（コンソールを出す場合は 1）
' False: プロセスの終了を待たずに次へ進む
objShell.Run strCommand, 1, False
' 現在の（WScript）プロセスを終了させる
' これを忘れると、WScriptとCScriptの両方がメモリに残る「ゾンビプロセス」が発生する
WScript.Quit
End If
End Sub4. 設計上の致命的な陥穽（Pitfalls）
このブートストラップを実装する際、設計者が陥りやすいミスが3つある。これを知らない者は、バグの温床を作る。
① ゾンビプロセスの発生
`objShell.Run` で再起動をかけた後、`WScript.Quit` を忘れてはならない。これを忘れると、GUIベースのプロセスがバックグラウンドで生き残り続け、リソースを食いつぶすだけでなく、ファイルロック等の問題を引き起こす。
② ファイル・データベース接続のライフサイクル
ブートストラップ処理は、必ず「すべてのリソース確保」よりも前に実行せよ。
もし、スクリプトの冒頭でデータベースへのコネクションを確立したり、ログファイルを開いたりした後に `EnsureCScript` を呼び出すと、再起動後のプロセスが「ファイルが既に使用されています」というエラーで衝突する可能性がある。
「環境を整えてから、リソースを掴む」――これは鉄則だ。
③ 引数のエスケープ処理
引数にスペースが含まれるパス（例: `C:\Program Files\…`）を扱う場合、引数全体を `”` (ダブルクォーテーション) で適切にラップしなければ、再起動後のスクリプトは引数を分割して認識し、壊滅的な挙動を示す。上記のコード例では、`”””` を用いてこれを解決している。
5. 結論
VBScriptは古くからある技術だが、その制御権を完全に握ることで、現代の自動化ワークフローにおいても極めて堅牢なコンポーネントとなり得る。
`WScript.FullName` を用いた自己再起動の実装は、単なるテクニックではない。それは、「実行環境を制御下に置く」という、エンジニアとしての規律の現れである。
このコードをテンプレートとして、君たちのプロジェクトの基盤に組み込んでほしい。ユーザーがどのようにスクリプトを叩こうとも、君の書いたロジックは常に、意図した通りのコンソール上で、完璧な制御下で実行されるはずだ。
