how to check to see if file is open before opening

[johnnyplang]

Everytime I press the active x control to run program.exe file a new window opens instead of placing the original window on top. The below statements don't work.

If hwnd <> 0 Then
AppActivate "program X"
Else
Shell ("c:\Program X.exe")
End If

 

[johnnyplang]

oops forgot the first line

hwnd = FindWindow(vbNullString, "program X")
If hwnd <> 0 Then
AppActivate "program X"
Else
Shell ("c:\Program X.exe")
End If