泥沼のレガシー環境を制する：`GetSpecialFolder(2)`による安全な一時ファイル管理の極意
多くのシステム管理者が「一時ファイルの削除」という単純なタスクで躓く。原因は明白だ。環境変数`%TEMP%`を安易に信用し、パスの解決をOSに委ねるという無防備な実装を行っているからだ。
VBScriptにおいて、Windowsの「正解」を取得する唯一の公的な作法は`FileSystemObject (FSO)`の`GetSpecialFolder`メソッドに他ならない。本稿では、この枯れた技術を、現代の複雑なWindows環境でいかに「プロフェッショナルな品質」で運用するかを説く。
—
なぜ `GetSpecialFolder(2)` なのか
環境変数`TEMP`は、ユーザー権限やプロセスの起動順序によって意図しないパスを参照する可能性がある。一方、`GetSpecialFolder(2)`は、Windows APIの`GetTempPath`をラップしたFSOのメソッドであり、OSが管理する真のテンポラリ領域を保証する。
ここで重要なのは、「FSOはCOMオブジェクトであり、メモリの墓場になり得る」という事実だ。初心者はオブジェクト生成を乱発し、ガベージコレクション（GC）に依存するが、我々はそれを許さない。
—
実装：堅牢なクリーニングスクリプト
以下に、対象ファイルを識別し、適切に廃棄するアーキテクチャを示す。単なる削除ではなく、「対象外を傷つけない」ための防衛的プログラミングを徹底している。
Option Explicit
‘ ———————————————————
‘ 関数名: CleanupAppTempFiles
‘ 用途: 特定アプリのプレフィックスを持つ一時ファイルを安全に削除
‘ ———————————————————
Sub CleanupAppTempFiles()
Dim fso, tempFolder, file, folderFiles
Dim targetPrefix, expirationDays
‘ 定数定義：保守性を高める
targetPrefix = “MyApp_”
expirationDays = 7
‘ 1. FSOのインスタンス化（必要最小限の生存期間）
Set fso = CreateObject(“Scripting.FileSystemObject”)
‘ 2. GetSpecialFolder(2)でTempディレクトリを取得
‘ これにより、環境依存のパス問題を完全に遮断する
Set tempFolder = fso.GetSpecialFolder(2)
Set folderFiles = tempFolder.Files
For Each file In folderFiles
‘ プレフィックスによるフィルタリングと更新日時のチェック
If Left(file.Name, Len(targetPrefix)) = targetPrefix Then
If DateDiff(“d”, file.DateLastModified, Now) > expirationDays Then
On Error Resume Next ‘ 実行中のファイルによるロックエラーを回避
file.Delete True
If Err.Number <> 0 Then
‘ 必要であればログに出力：WScript.Echo “Skipped: ” & file.Name
Err.Clear
End If
On Error Goto 0
End If
End If
Next
‘ 3. メモリの明示的解放（伝説的エンジニアの嗜み）
‘ 参照をNothingに戻し、COM参照カウントを即座にデクリメントする
Set folderFiles = Nothing
Set tempFolder = Nothing
Set fso = Nothing
End Sub
‘ 実行
CleanupAppTempFiles
—
シニアエンジニアが留意すべき3つの極意
1. エラーハンドリングの「沈黙」と「監視」
`On Error Resume Next`は悪ではない。しかし、これを乱用するのは無能の証明だ。上記コードでは、特定の削除失敗（ファイルがプロセスによってロックされている等）を業務上の「許容範囲」として処理している。重要なのは、「削除できなかったこと」をシステムが許容できるか否かの判断である。
2. COM参照カウンタの意識
VBScriptは参照カウント方式でメモリを管理する。`Set fso = Nothing`を省略するエンジニアが多いが、これは長期運用される常駐スクリプトや、タスクスケジューラで頻繁に呼び出される環境ではメモリリークの温床となる。常に生成したものは自分で消す。これが自動化の美学だ。
3. パフォーマンスへの執着
`folderFiles`コレクションの走査は、ファイル数が増大すると指数関数的に重くなる。もし対象が数千ファイルを超える場合は、FSOの`Folder.Files`ループではなく、`WMI (Win32_LogicalFileSecuritySetting)`や、より低レイヤーのAPI呼び出しを検討すべきだ。VBScriptの限界を知り、必要に応じてPowerShellやC#への移行を即座に判断する。それこそがアーキテクトの役割である。
—
結論
一時ファイルのクリーンアップは、ただ消せば良いという単純な作業ではない。システムの挙動を理解し、OSの意図を汲み、リソースを適切に解放する。その一連の規律の中に、我々が守るべき「保守性の魂」が宿っている。
このスクリプトを単なるコードとしてではなく、あなたの環境を安定させるための「守り神」として育て上げてほしい。それが、この古くて新しい言語を掌握する者への唯一の道だ。
