鉄壁の排他制御：MutexによるVB.NET多重起動防止の極致
業務アプリケーションにおいて、多重起動は単なる「お行儀の悪い挙動」ではない。それはデータベースの整合性破壊、ファイルロックによるデッドロック、そして何より、現場の運用担当者を絶望の淵に突き落とす「予期せぬ競合事故」の引き金だ。
VBAで `App.PrevInstance` を頼りにしていた時代は終わった。現代の.NET環境において、プロセスを唯一無二の存在として確立するための「Mutex（ミューテックス）」による制御は、シニアエンジニアが備えるべき最低限の防壁である。
今回は、単に「動くコード」ではなく、カーネルオブジェクトのライフサイクルを意識した、堅牢な実装論を説く。
—
1. なぜMutexなのか：OSレベルの同期の真実
多重起動を防止する方法はいくつか存在するが、`Process.GetProcessesByName` でプロセスリストを走査するのは二流のやり方だ。それは「たまたまその瞬間にプロセスが見えなかったら」というレースコンディション（競合状態）を許容する脆弱な実装に他ならない。
対して `System.Threading.Mutex` は、Windowsカーネルが管理する同期オブジェクトだ。OSが「この名前のMutexは既に存在するか」をアトミック（不可分）に保証する。これこそが、信頼性の高い業務システムに求められる挙動である。
—
2. 実装の極致：疎結合で安全な二重起動防止
以下に、アプリケーションの起動時に呼び出すべき、洗練された排他制御クラスの雛形を示す。
Imports System.Threading
Public NotInheritable Class ApplicationGuard
‘ OS全体で一意となる名前（GUIDを使うのがプロの流儀だ）
Private Const MutexName As String = “Global\MyCompany_App_Unique_ID_2023″
Private Shared _mutex As Mutex
”’
”’
Public Shared Function IsAlreadyRunning() As Boolean
Dim createdNew As Boolean
‘ 既存のMutexを取得、あるいは新規作成する
‘ Global\ を付与することで、セッションを超えた全ユーザーでの競合も防げる
_mutex = New Mutex(True, MutexName, createdNew)
‘ createdNew が False なら、既に誰かがこのMutexを所有している
If Not createdNew Then
‘ 既に起動している場合は、Mutexを破棄して終了フラグを立てる
_mutex.Dispose()
Return True
End If
Return False
End Function
”’
”’
Public Shared Sub Release()
If _mutex IsNot Nothing Then
_mutex.ReleaseMutex()
_mutex.Dispose()
End If
End Sub
End Class
この実装の勘所
1. Global名前空間の利用: Windowsのターミナルサービス（リモートデスクトップ）環境を考慮し、`Global\` プレフィックスを付与している。これを怠ると、別ユーザーセッションでツールが立ち上がってしまう事故が多発する。
2. IDの選定: `MutexName` には必ずGUIDや、プロジェクト固有の文字列を組み込むこと。安易な名称は他システムとの予期せぬ衝突を招く。
3. 明示的なDispose: `Mutex` はアンマネージリソースをラップしている。アプリケーション終了時には確実に `Dispose` を呼び出すのが、メモリリークを避けるアーキテクトの矜持だ。
—
3. エントリポイントでの厳格なハンドリング
`Sub Main` または `Application_Startup` で、この制御を組み込む。ここでのポイントは、ユーザーへのフィードバックを怠らないことだ。
Sub Main()
‘ 起動チェック
If ApplicationGuard.IsAlreadyRunning() Then
‘ メッセージボックスを出し、既存プロセスへフォーカスを移す工夫もあれば尚良し
MessageBox.Show(“既にアプリケーションが起動しています。”, “二重起動エラー”, MessageBoxButtons.OK, MessageBoxIcon.Warning)
Return
End If
Try
‘ メインフォームの起動
Application.Run(New MainForm())
Finally
‘ 異常終了時も含め、必ずロックを解除する
ApplicationGuard.Release()
End Try
End Sub
—
4. 伝説のエンジニアからの忠告
レガシーなVB6からの移行や、古いDLLとの混在環境で苦しんでいる諸君に一つだけ。
「プロセス終了時にOSが勝手にMutexを片付けてくれる」と盲信してはならない。
WindowsカーネルはMutexを保持したプロセスが死ねば解放するが、それは「瞬時」ではない。短時間に連続して起動・終了を繰り返すような運用が想定される場合、OSのリソース管理が追いつかず、「既に起動中」と誤検知されることがある。
だからこそ、`Finally` ブロックによる明示的な解放と、可能であればWindows APIの `OpenMutex` や `ReleaseMutex` を用いたより低レイヤーの生存確認を行うのが、真に「壊れないシステム」を構築する者の責務である。
コードは嘘をつかない。しかし、OSの挙動は時に気まぐれだ。その気まぐれを制御下に置くことこそが、自動化エンジニアとしての腕の見せ所である。
さあ、堅牢なコードで現場の運用リスクを根絶やしにせよ。健闘を祈る。
