vbscript - vbscriptを使用してOutlookが実行されているかどうかを確認する方法

Question

vbscriptを使用してOutlookが実行されているかどうかを確認する方法、アプリケーションをインストールする前にOutlookを閉じるようにユーザーに求めるインストール手順でこれが必要です。

ありがとう、

Answer 1

関数を使用して Outlook Application オブジェクトを取得してみてくださいGetObject。関数呼び出しが成功した場合、これは Outlook が現在実行されていることを意味します。

On Error Resume Next
Dim Outlook: Set Outlook = GetObject(, "Outlook.Application")

If Err.Number = 0 Then
  ' Outlook is running
Else
  ' Outlook is not running
  Err.Clear
End If

On Error Goto 0

Answer 2

Dim Process, strObject, strProcess
Const strComputer = "." 
strProcess = "OUTLOOK.exe"
IsProcessRunning = False
strObject   = "winmgmts://" & strComputer
For Each Process in GetObject( strObject ).InstancesOf( "win32_process" )
If UCase( Process.name ) = UCase( strProcess ) Then
        MsgBox "Outlook is running"
    End If
Next