VBScriptを掌握する：WindowsとUNIXの「パス区切り」を統一する安全パーサーの実装術
こんにちは。現場の最前線で自動化アーキテクチャを設計しているエンジニアです。
VBScriptを触っていると、必ずと言っていいほど直面するのが「パスの区切り文字問題」です。Windowsのバックスラッシュ（`\`）と、LinuxやWeb APIが吐き出すスラッシュ（`/`）。これらが混在した文字列をそのままファイルシステムに投げれば、エラーでスクリプトは止まり、自動化の夢はそこで潰えます。
今日は、マクロ記録の呪縛を解き放ち、堅牢なシステムを構築するための「パス正規化パーサー」を伝授します。ここをクリアすれば、あなたのスクリプトは一段上の信頼性を獲得します。
—
1. なぜ「パスの混在」が致命的なのか
Windowsの`FileSystemObject`は優秀ですが、非常に潔癖です。「`C:/Users/Data/file.txt`」のような、スラッシュ混じりのパスを渡したとき、環境やメソッドによっては解釈ミスを起こしたり、警告なしに失敗することがあります。
特に、REST APIから受け取ったパスをローカルに保存するようなケースでは、この「記号の揺らぎ」を吸収する正規化（Normalization）が必須です。
—
2. 安全なパス変換パーサー：実装コード
まずは、この関数をあなたのツールボックスに入れてください。`Replace`関数を単純に使うだけでなく、末尾の不要なセパレータの整理まで考慮した「現場仕様」です。
‘ =========================================================
‘ パス正規化関数 (ToWindowsPath / ToUnixPath)
‘ @param path: 変換対象のパス文字列
‘ @return: 指定したOS形式に統一されたパス
‘ =========================================================
‘ Windows形式 (\) に変換する
Function ToWindowsPath(ByVal path)
Dim result
‘ まずスラッシュをバックスラッシュに置換
result = Replace(path, “/”, “\”)
‘ 連続するバックスラッシュを1つにまとめる（安全対策）
Do While InStr(result, “\\”) > 0
result = Replace(result, “\\”, “\”)
Loop
ToWindowsPath = result
End Function
‘ UNIX/Web形式 (/) に変換する
Function ToUnixPath(ByVal path)
Dim result
‘ バックスラッシュをスラッシュに置換
result = Replace(path, “\”, “/”)
‘ 連続するスラッシュを1つにまとめる
Do While InStr(result, “//”) > 0
result = Replace(result, “//”, “/”)
Loop
ToUnixPath = result
End Function
‘ — 使用例 —
Dim rawPath, cleanPath
rawPath = “C:/Users\Admin/Documents//Report.txt”
WScript.Echo “変換前: ” & rawPath
WScript.Echo “Windows用: ” & ToWindowsPath(rawPath)
WScript.Echo “UNIX用: ” & ToUnixPath(rawPath)
このコードの「設計思想」
- Do Whileループの重要性: 単純な `Replace` だけでは、`/` が連続していた場合に「`//`」が残り続けてしまいます。`InStr` で存在確認をしながらループを回すことで、どんなに汚れたパスでも「きれいな1本の道」に整地します。
- 関数の分離: Windows用とUNIX用を分けることで、可読性を維持しています。迷いが生じない設計こそが、保守性の高いコードの第一歩です。
—
3. 初学者が陥りやすい罠：文字コードとエスケープ
VBScriptを扱う上で、以下の2点は必ず心に留めておいてください。
1. パスの末尾問題:
`C:\Data\` のように、末尾にセパレータがついている場合と、ついていない場合の両方を想定してください。プログラムのロジックで「`path & “\” & filename`」と結合した際、セパレータが二重になる（`\\`）事故は、バグの温床です。
2. 実行環境の権限:
WSHは強力ですが、OSの深い階層（`C:\Windows`配下など）を触る場合、スクリプトの実行権限（管理者として実行）が不足していると、パスが正しくても「許可がありません」と怒られます。
—
4. プロのエンジニアへの第一歩
今回紹介した「パスパーサー」は、単なる文字列変換ではありません。「外部からの入力（APIやユーザー入力）を信用せず、自らの規約に従わせる」という、プログラミングにおける防御的設計（Defensive Programming）の基本です。
VBScriptは古い言語だと言われますが、Windows環境の自動化においてはこれほど軽量で強力なツールはありません。マクロの記録から脱却し、こうして「関数」を積み上げていくことで、あなたは「動くコード」ではなく「壊れないシステム」を作れるようになります。
まずは、このコードを自分のプロジェクトに組み込んでみてください。何かわからないことがあれば、いつでも聞いてくださいね。応援しています！
