هل برنامج معين مفتوح ويعمل أم لا؟

السلام عليكم ورحمة الله وبركاته

أحييكم يا عباقرة MS Access

حاولت البحث عن كود يقوم بالتأكد مت تشغيل برنامج معين أم لا ولكنى لم أجد.

أوضح لكم

أريد أن اضع كود يقوم بالتأكد من أن برنامج معين مفتوح ويعمل قبل أن أقوم بإجراء آخر.

مثلا :

أريد التأكد من أن برنامج OUTLOOK.EXE مفتوح ... لقد وجدت هذا الكود ولكنه لم يفلح معى

Dim pProcess() As Process
pProcess = System.Diagnostics.Process.GetProcessesByName("OUTLOOK.EXE")
If pProcess.Length > 1 Then MsgBox "The program is running"

أنا أستخدم Office 2010

Ganabo