correct way to avoid duplicate instances 3

[obulldog27]

I want to avoid having duplicate instances of my program
running. When I test this I get the msg but the program is
still loaded.

If App.PrevInstance = True Then
MsgBox "This program is already running!", vbExclamation
End
End If

 

[Sheco]

Are you saying that the program does not stop running when it hits the End ?

 

[obulldog27]

yes if you click on the exeutible file then twice on instance get loaded with the database data and then the msg appears , I click ok and then the duplicate instance appears but with no data.

 

[Sheco]

Is this the first line in your Sub Main() or Form_Load() ?

 

[obulldog27]

it is in the Form_Load()and No it is not exactly the first line in the function. I am using vb6 sp6

thanks

 

[chiph]

Put the check for the previous instance in a sub Main, and load the form from there if it's the first instance.

Chip H.


____________________________________________________________________
Click here to learn Ways to help with Tsunami Relief
If you want to get the best response to a question, please read FAQ222-2244 first

 

[TheVampire]

And avoid using the END statement ( search the forum for background on why ). Use "Unload Me" instead.

Robert

 

[Hypetia]

See also thread222-616828 for the same topic in a different perspective.