How can I detect if my application is already running?

[GZook]

I don't want the program to be run on top of another copy of itself. I want something simple to place at the very start of my Main procedure. My application has no forms.

I picture a simple If structure as follows:

If ______________ Then
    lRetVal = MsgBox("Program is already running.",vbOkOnly)
    End
End If

Help me fill in the blank.

 

[TheVampire]

If App.PrevInstance = True Then



Robert

 

[petermeachem]

if app.previnstance then

...

http://www.therockalltimes.co.uk

http://www.therockalltimes.co.uk/2003/03/24/geneva-convention.html

 

[GZook]

Thanks to both of you for your answers.

 

[strongm]

Stars all round, then...