VBScriptでINIファイルを「安全かつ確実に」書き換えるための極限の作法
古参のシステム管理者や自動化エンジニアにとって、VBScriptは今なお「枯れた技術」ではなく「環境を選ばない最強の武器」だ。特にINIファイルやプロパティファイルのパラメータ更新は、バッチ処理の自動化において避けては通れない道である。
しかし、多くの初心者は `FileSystemObject (FSO)` を雑に扱い、ファイルロックやメモリリークを招き、システムの安定性を損なっている。本稿では、VBScriptにおける「破壊を伴わない安全な更新ロジック」と、リソース管理の極意を伝授する。
—
1. なぜ「行単位の書き換え」にFSOとRegExpを組み合わせるのか
INIファイルの書き換えにおいて、単純な `InStr` での置換は危険だ。コメントアウトされた行や、偶然一致した文字列まで書き換えてしまう可能性がある。
我々が取るべきアプローチは以下の通りだ。
1. Read（読み込み）: ファイル全体をメモリにロードし、ストリームを閉じる。
2. Process（処理）: 正規表現（RegExp）を用いて、対象のキーのみをターゲットにする。
3. Write（書き込み）: 一時ファイルを経由せず、論理的なバッファを構築した後に一括出力する。
これにより、ファイルロック時間を極小化し、万が一の書き込み失敗時にも元のファイルを損なわない堅牢なアーキテクチャを実現する。
—
2. 実践：極限まで最適化された更新スクリプト
以下に、メモリ効率と安全性を考慮したテンプレートを公開する。
‘ — 構成更新用スクリプト: UpdateConfig.vbs —
Option Explicit
‘ メモリ効率を意識した定数
Const ForReading = 1, ForWriting = 2
Sub UpdateIniParameter(strFilePath, strKey, strNewValue)
Dim objFSO, objFile, strContent, objRegExp
Set objFSO = CreateObject(“Scripting.FileSystemObject”)
‘ ファイル存在チェック（例外処理の基本）
If Not objFSO.FileExists(strFilePath) Then
WScript.Echo “Error: File not found – ” & strFilePath
Exit Sub
End If
‘ ファイル全体の読み込み
Set objFile = objFSO.OpenTextFile(strFilePath, ForReading)
strContent = objFile.ReadAll
objFile.Close
‘ オブジェクトの早期解放（スコープ制御）
Set objFile = Nothing
‘ 正規表現によるピンポイント置換
‘ 解説: ^(\sKey\s=).$ を検索し、後方参照を使って置換する
Set objRegExp = New RegExp
objRegExp.Pattern = “^(\s” & strKey & “\s=).$”
objRegExp.IgnoreCase = True
objRegExp.MultiLine = True
‘ 置換実行
strContent = objRegExp.Replace(strContent, “$1” & strNewValue)
‘ 変更が確定した場合のみ書き込みを行う（不要なディスクI/Oを避ける）
Set objFile = objFSO.OpenTextFile(strFilePath, ForWriting)
objFile.Write strContent
objFile.Close
‘ オブジェクトの明示的解放（伝説のエンジニアの流儀）
Set objFile = Nothing
Set objRegExp = Nothing
Set objFSO = Nothing
End Sub
‘ 実行例
UpdateIniParameter “C:\Config\settings.ini”, “Timeout”, “3000”
—
3. シニアエンジニアが知るべき「見えない懸念」
このコードを運用に乗せる際、以下の「深淵なる知見」を忘れてはならない。
① エンコーディングの罠
VBScriptの `ReadAll` は、デフォルトでシステムロケール（多くはANSI/Shift-JIS）で読み込む。もしUTF-8（BOMなし）のファイルを操作する場合、FSO単体では文字化けを引き起こす。その場合は `ADODB.Stream` オブジェクトを使用してバイナリとしてロードし、文字列変換を噛ませるのがプロの作法だ。
② メモリの断片化とオブジェクト管理
VBScriptはガベージコレクションが非常に緩やかだ。大規模なファイルを操作する際、`Set obj = Nothing` を怠れば、親プロセス（WScript.exe）がメモリを掴み続け、高負荷環境下で「メモリ不足」を招く。「使わなくなったら即座に捨てる」。これがレガシー環境を生き抜く鉄則である。
③ アトミックな更新の重要性
本稿のコードはシンプルさを優先しているが、ミッションクリティカルな環境では「書き込み中の電源断」を考慮しなければならない。その場合は以下の手法を推奨する。
1. `config.ini.tmp` を生成し、そこに書き込む。
2. `FSO.MoveFile` で上書きする（Windows API的にアトミックな置き換えに近い挙動が期待できる）。
—
最後に：自動化の真髄
自動化とは、単にコードを書くことではない。「いかに予期せぬエラーを排除し、いつ誰が実行しても同じ結果を保証するか」という、エンジニアの意志をプログラムに吹き込む作業だ。
VBScriptは古い。だが、そのシンプルさゆえに、アーキテクトの腕が如実に表れる。このスクリプトが、貴殿の過酷な運用現場において、静かに、そして確実に機能することを願っている。
