VBScriptを掌握せよ：WMIとネットワーク共有を用いた「極限」のリモート実行アーキテクチャ
諸君、VBScriptは「死んだ言語」ではない。Windowsが存在する限り、そこには常に最も軽量で、かつ最も強力なシェルレイヤーが存在し続けている。
今日は、レガシーを愛し、かつ効率を極限まで追求するエンジニアのために、WMI（Windows Management Instrumentation）とファイル共有を駆使した「リモート端末一括展開タスク」の真髄を解き明かす。GUIや重厚なエージェントソフトウェアに頼らず、OSの心臓部を直接叩く手法だ。
1. アーキテクチャの核心：なぜ「WMI」なのか
リモートでコマンドを実行する際、WinRMやPowerShell Remotingが第一選択肢になりがちだが、セキュリティポリシーや実行環境の制限でそれらが使えないケースは多い。ここで真価を発揮するのが `Win32_Process` クラスである。
WMIはDCOM（Distributed COM）を介して通信を行う。これはWindowsの基層に深く根ざしており、OSが稼働していれば、ほぼ確実に実行可能だ。我々が構築するのは、以下の流れによる「ゼロフットプリント」に近い実行モデルである。
1. ネットワーク経由の配布: UNCパスを通じたコードの配置
2. 実行のトリガー: WMIの `Create` メソッドによるリモートプロセス生成
3. ライフサイクル管理: プロセスの非同期実行と結果のハンドリング
2. 実装：遠隔実行エンジンの設計
以下のコードは、単なるサンプルではない。システム管理者が「一括展開」を行う際の、堅牢かつ最小構成のエンジンだ。
‘ リモート実行エンジン：RemoteDeploy.vbs
Option Explicit
‘ 実行設定
Const TARGET_MACHINE = “REMOTE_PC_01”
Const SCRIPT_PATH = “\\Server\Share\Deploy\Task.vbs”
Const REMOTE_DEST = “C:\Windows\Temp\Task.vbs”
‘ WMI接続情報の管理
Dim objWMIService, objProcess, intResult
Set objWMIService = GetObject(“winmgmts:{impersonationLevel=impersonate}!\\” & TARGET_MACHINE & “\root\cimv2”)
‘ 【極限の知見】実行コマンドラインの組み立て
‘ cmd /c で実行することで、環境変数やリダイレクトを安全に処理する
Dim strCommand
strCommand = “cmd /c cscript.exe //B //Nologo ” & REMOTE_DEST
‘ プロセス生成の実行
Set objProcess = objWMIService.Get(“Win32_Process”)
intResult = objProcess.Create(strCommand, Null, Null, intProcessID)
If intResult = 0 Then
WScript.Echo “成功: プロセスID ” & intProcessID & ” で起動しました。”
Else
WScript.Echo “失敗: エラーコード ” & intResult
End If
‘ 【メモリ最適化】オブジェクトの明示的解放
‘ VBScriptのGCを待つな。リソースは自ら手放せ。
Set objProcess = Nothing
Set objWMIService = Nothing
3. シニアエンジニアが意識すべき「3つの鉄則」
① DCOMのインプロシネーション（Impersonation）
`winmgmts:{impersonationLevel=impersonate}` は必須だ。これを指定しないと、リモート先で権限不足によりプロセスが生成できない。また、実行側には「ドメイン管理者」あるいは「対象端末のローカル管理者」権限が必要だ。この権限管理こそが、インフラ管理者の腕の見せ所である。
② ファイル転送のオーバーヘッドと同期
スクリプトを `\\Server\Share` から直接実行するのではなく、一度 `C:\Windows\Temp` にコピーしてから実行するのは、ネットワーク切断による不安定さを排除するためだ。この「ローカルコピー」のルーチンを自動化する際、`FileSystemObject` で `FileExists` と `CopyFile` を組み合わせる際には、常にタイムアウトを考慮したエラーハンドリングを実装せよ。
③ メモリリークとプロセスゾンビ
VBScriptはガベージコレクションが極めてルーズだ。特にループ処理で大量の端末を叩く場合、`Set obj = Nothing` を忘れることは死を意味する。また、`Win32_Process.Create` は「実行して終わり」であり、終了確認は行わない。もし完了を待機する必要があるなら、`Win32_Process` を監視し、`ProcessID` が終了するまでループを回す「ポーリング監視」の実装が求められる。
4. 最後に：レガシーは「最強の武器」である
現代のクラウドネイティブな環境においても、このWMIベースの自動化は依然として最強のフォールバック手段だ。エージェントをインストールできない環境、あるいはOSの挙動が怪しいレガシーなWindows Serverにおいて、VBScriptは最後の砦となる。
諸君、コードを書くときは常に「OSの設計思想」に寄り添え。システムを破壊するのも管理するのも、結局は設計者の「細部へのこだわり」次第だ。
この知識を、自身の管理するインフラという名の宇宙に役立ててほしい。健闘を祈る。
