なぜ「文字列操作」でパスをこねくり回すのか？VBScriptで上位フォルダを確実に掌握する唯一の解
現場でよく見る「動かないスクリプト」の典型的な特徴がある。それは、ファイルパスを `InStrRev` や `Left` 関数で切り貼りして無理やり上位フォルダを導き出そうとする、脆いロジックだ。
「`\` の位置を検索して……」なんてコードを書いている時点で、君は未来のバグを自ら生産している。パスの区切り文字や末尾のフラグひとつで崩壊するような不安定な設計は、プロの現場では許されない。
今回は、FileSystemObject (FSO) の `ParentFolder` プロパティを「多重チェーン（チェイン）」させることで、環境変化に極めて強く、かつ可読性の高いパス解決術を伝授する。
—
1. 文字列操作が「悪」である理由
パス操作を文字列として扱うと、以下のような地雷を踏むことになる。
- OSや環境の差異: 環境によってパスの末尾に `\` があったりなかったりするだけで、ロジックが破綻する。
- 保守性の欠如: 数ヶ月後にコードを見たとき、「この `InStrRev` は何を意図しているのか？」を一瞬で理解できる者はいない。
- 堅牢性の欠如: ネットワークドライブ、UNCパス、特殊なフォルダ構造において、文字列ベースの切り出しは境界条件で必ず死ぬ。
FSOの `ParentFolder` は、「パス文字列」を操作するのではなく「フォルダオブジェクトの階層構造」を辿る。これはOSのファイルシステムと直接対話しているため、理論上、最も安全で堅牢な手法だ。
—
2. 実戦的アプローチ：ParentFolderチェーン
スクリプト自身を基準にして「2階層上」や「3階層上」のプロジェクトルートを特定する場合、以下のように記述するのが正解だ。
Option Explicit
‘ メイン処理
Call Main()
Sub Main()
Dim fso, scriptPath, rootFolder
Set fso = CreateObject(“Scripting.FileSystemObject”)
‘ 1. スクリプト自身のフルパスを取得
scriptPath = WScript.ScriptFullName
‘ 2. スクリプトの親（フォルダ）を取得
‘ 3. さらにその親、そのまた親をチェーンで辿る
‘ 階層が深い場合は変数に格納して可読性を保つのがプロの作法
‘ スクリプトの親フォルダ（1階層上）
Dim folderL1
Set folderL1 = fso.GetFile(scriptPath).ParentFolder
‘ プロジェクトルート（2階層上：ここが実務上のゴールと仮定）
Dim projectRoot
Set projectRoot = folderL1.ParentFolder
‘ もし3階層上なら…
‘ Set projectRoot = folderL1.ParentFolder.ParentFolder
WScript.Echo “プロジェクトルート: ” & projectRoot.Path
‘ 後片付け
Set fso = Nothing
End Sub
なぜこれが「最強」なのか
- 型安全: `ParentFolder` は必ず `Folder` オブジェクトを返す。文字列の切り出しミスによるエラーが物理的に発生しない。
- 直感的な記述: コードを見るだけで「階層構造を辿っている」ことが一目瞭然。コメントで長々とロジックを説明する必要がない。
—
3. 業務自動化における注意点：データベースと連携する場合
この手法で得たパスを、DB接続文字列や設定ファイル（INI/JSON）の読み込みに使う際は、以下の「鉄の掟」を守れ。
1. 絶対パスの正規化: `fso.GetAbsolutePathName()` を使い、常にフルパスで管理せよ。相対パスをDBに保存するのは、後のトラブルの元だ。
2. 存在チェックの義務化: プロジェクトルートを得たら、必ず `fso.FolderExists(projectRoot.Path)` で存在を確認すること。ネットワーク切断等のリスクを考慮し、例外（エラー）が発生した際のアラート処理は必須だ。
3. オブジェクトの解放: VBScriptはガベージコレクションが強力とは言えない。`Set` したオブジェクトは、関数の最後で必ず `Nothing` を代入する癖をつけろ。メモリリークは、長期間動かし続ける自動化ツールにとって致命傷となる。
—
結論：コードは「読み手」のために書け
初心者は「いかに短く書くか」に腐心するが、伝説的なエンジニアは「いかに後任者がバグを埋め込まずに改修できるか」を考える。
`ParentFolder.ParentFolder` と繋げるこの書き方は、一見すると冗長に見えるかもしれない。しかし、これこそが「構造」をコード上に表現するということだ。
明日からの開発で、文字列操作でパスを切り出すコードを見つけたら、即座にこのパターンにリファクタリングせよ。それが、君の作成するツールが「動くゴミ」から「信頼できる資産」へと進化する第一歩だ。
