Determining Whether an Application is Running

[GummowN]

Is it possible to have a function along the lines of:

Function CheckandOpen(filename as string, activate as true)
If filename is running then
If activate is true then
Make filename active application
End if
Else
Launch application
If activate is true then
Make filename active application
End if
End if
End function

I have tried various methods using shell, getobject...etc but with no success.

Primarily I am looking to activate lotus notes, but the function needs to be flexible.

I did try appactivate(strfilename), but that doesnt work as it needs the name of the application in the appbar - which can change with notes depending on your open database.

This is making me bald!

 

[Francescina]

I am certain that there is a beautiful API function that does the job.

 

[GrantDB]

Some of these links may give you some ideas

http://www.mvps.org/access/api/api0007.htm

http://www.mvps.org/access/api/api0013.htm

 

[GummowN]

Thanks for that.