【環境変数操作】WScript.Shell.Environment を利用したシステム・ユーザー環境変数の動的追加と更新手順
レガシーシステムの裏側、あるいはキッティングの自動化スクリプトにおいて、環境変数の動的な操作は避けて通れない領域だ。
しかし、VBScriptにおける環境変数の扱いは、その簡便さの裏に「スコープの誤認」「プロセスの寿命」「変更の即時反映の罠」という深刻な牙を隠している。
今回は、WScript.Shellの `Environment` コレクションを極限まで使いこなし、システム、ユーザー、そしてプロセスの各スコープを完全に掌握するための実践的知見を共有する。
—
1. Environmentコレクションのスコープ構造と本質
WScript.Shellオブジェクトの `Environment` プロパティは、引数に渡す文字列によって挙動が根本から変わる。ここを曖昧にしているエンジニアが多すぎる。
指定できるスコープは以下の4つだ。
- Process: 現在のWScript.Shellインスタンス（およびそこからフォークする子プロセス）のメモリ空間に存在する環境変数。
- User: 現在のログオンユーザーの環境変数。レジストリ (`HKCU\Environment`) に書き込まれる。
- System: システム全体の環境変数。レジストリ (`HKLM\SYSTEM\CurrentControlSet\Control\Session Manager\Environment`) に書き込まれ、昇格された特権（管理者権限）が必須となる。
- Volatile: セッション固有の動的変数。ターミナルサービス環境などで利用される。
メモリとライフサイクルの厳密な分離
`Process` スコープへの変更は瞬時に完了し、親プロセスや同一セッション内の後続処理に影響を与えるが、スクリプトが終了すれば消滅する。
一方、`User` や `System` スコープへの書き込みは永続化されるが、書き込んだだけでは「現在稼働中の他のプロセスや、既存のコマンドプロンプトウィンドウ」には反映されない。この物理的なタイムラグとスコープの境界を意識することが、トラブルシューティングの第一歩となる。
—
2. 実装パターン：安全かつ確実に環境変数を操作する
以下のプロダクションコードは、エラーハンドリング、特権昇格の考慮、そしてオブジェクトの明示的な解放（メモリ最適化）を網羅した実用スクリプトである。
Option Explicit
‘ —————————————————————–
‘ @file: ManageEnvironment.vbs
‘ @brief: WScript.Shell.Environment を用いた環境変数の高度な動的制御
‘ —————————————————————–
Call Main()
Sub Main()
Dim oShell, oEnvProc, oEnvUser, oEnvSys
Dim targetName, targetValue
targetName = “MY_CUSTOM_TOOL_PATH”
targetValue = “C:\Tools\EnterpriseApp”
‘ 1. WScript.Shell のインスタンス生成
Set oShell = WScript.CreateObject(“WScript.Shell”)
On Error Resume Next
‘ =================================================================
‘ A. Process スコープの操作（即時反映・一時的）
‘ =================================================================
Set oEnvProc = oShell.Environment(“Process”)
oEnvProc(targetName) = targetValue
WScript.Echo “[Process] 設定完了: ” & targetName & ” = ” & oEnvProc(targetName)
‘ 使い終わったコレクションオブジェクトは即座に解放
Set oEnvProc = Nothing
‘ =================================================================
‘ B. User スコープの操作（永続化・レジストリ書き込み）
‘ =================================================================
Set oEnvUser = oShell.Environment(“User”)
oEnvUser(targetName) = targetValue
If Err.Number <> 0 Then
WScript.Echo “[User] エラー発生: ” & Err.Description
Err.Clear
Else
WScript.Echo “[User] レジストリへの書き込み成功: ” & targetName
End If
Set oEnvUser = Nothing
‘ =================================================================
‘ C. System スコープの操作（要管理者特権）
‘ =================================================================
‘ ※ 注意: 一般権限で実行した場合、ここで権限エラー(エラー番号 70: 書き込み権限がありません)が発生する
Set oEnvSys = oShell.Environment(“System”)
oEnvSys(targetName) = targetValue
If Err.Number <> 0 Then
WScript.Echo “[System] 書き込み失敗（管理者権限が必要典です）: ” & Err.Description
Err.Clear
Else
WScript.Echo “[System] システム環境変数の更新成功: ” & targetName
End If
Set oEnvSys = Nothing
On Error Goto 0
‘ 2. オブジェクトの完全解放（VBScriptエンジンのメモリリーク防止）
Set oShell = Nothing
WScript.Echo “すべての環境変数操作プロセスが完了しました。”
End Sub
—
3. チーフアーキテクトが警鐘を鳴らす「3つの罠」
① レジストリ書き込み後の「即時反映」の幻想
`User` や `System` に対して `oEnvUser(“PATH”) = …` と記述して値を書き換えても、すでに起動しているGUIアプリケーションやコマンドプロンプトは古い環境変数を保持し続けている。
OSのシェル（explorer.exe）や他のプロセスにこれを認知させるには、Windows APIの `SendMessageTimeout` を呼び出し、`WM_SETTINGCHANGE` メッセージ（`Environment` ブロードキャスト）を送信する必要がある。
VBScript単体ではWin32 APIの直接フックが困難なため、永続変数を書き換えた後は、必要に応じてバッチ側で環境変数をリロードする工夫、あるいはログオフ・再起動のフローを設計に組み込むべきだ。
② VBScriptにおけるCOMオブジェクトの寿命管理
WScript.ShellなどのCOMオブジェクトは、スクリプト終了時に自動解放されるが、巨大なループ処理やIIS等からの呼び出し（COMコンポーネントとしての利用）の文脈では、明示的な `Set obj = Nothing` を怠ると、メモリリークやプロセスハンドルの枯渇を引き起こす。
特に `Environment(“System”)` のようなシステムリソースに直結するコレクションを取得した際は、利用後即座に `Nothing` を代立させること。
③ 権限昇格（UAC）の壁
Systemスコープを触るスクリプトは、当然ながらAdministrator権限（あるいはそれに準ずる特権）を要求する。
一般ユーザー権限で実行されたスクリプトが `Environment(“System”)` にアクセスした瞬間、VBScriptは容赦なく実行時エラー（権限不足）を吐く。
自動化スクリプトをデプロイする際は、WScriptでの実行ではなく、あらかじめマニフェスト等で管理者昇格を強制したシェルからキックするアーキテクチャ設計が不可欠となる。
—
総括
VBScriptはレガシーな言語として片付けられがちだが、Windows OSの深部（COM、WSH、レジストリ）にこれほどダイレクトかつミニマルにアクセスできるインターフェースは、現代の言語においても稀有である。
環境変数のスコープの本質を理解し、メモリとライフサイクルを完全に制御下に対置できた時、あなたの書く自動化スクリプトは、単なる「動くコード」から「破壊されないインフラストラクチャの一部」へと昇華する。
