how to stop multiples of the same application from running

[johnnyplang]

I have an application that opens in VB but when then action is triggered again another instance of the program opens instead of maximizing the first instance. I tried the below but that doesn't work.

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

 

[gmmastros]

Is this what you are looking for?

http://www.vbexplorer.com/VBExplorer/tips/src03.htm

-George

Strong and bitter words indicate a weak cause. - Fortune cookie wisdom

 

[guitardave78]

try

Private Sub Form_Load()
    If App.PrevInstance Then
        Unload Me
    End If
end sub

}...the bane of my life!

http://www.fuzzyd.co.uk

 

[johnnyplang]

GD,

What is App.PrevInstance? I get an error when it gets to that step. Sorry for being a rookie.

 

[gmmastros]

guitardave78,

Did you look at the site I posted the link for? Your solution doesn't bring the 'Previous Instance' to the front.

-George

Strong and bitter words indicate a weak cause. - Fortune cookie wisdom

 

[guitardave78]

very true it just stops another instance running. Didnt read all the post :S

}...the bane of my life!

http://www.fuzzyd.co.uk

 

[johnnyplang]

guitardave78,

It faulted on the App.PrevInstance line. I am not sure what that does?

 

[guitardave78]

if you are on the main form (the one that loads up at the start of the app) and you type app. you will get a list of methods etc, one is PrevInstance. All it does is look to see if it is already running. If it is it unlods the main form...thus closing the application.

}...the bane of my life!

http://www.fuzzyd.co.uk

 

[Golom]

App" is the Application object and it is a builtin object in every VB application. It provides you with information about the current application. For example
[tt]
App.PrevInstance --> TRUE if another instance is running
App.Path --> The path to the .VBP or .EXE file
App.EXEName --> The name of the EXE
etc.
[/tt]

[small]No! No! You're not thinking ... you're only being logical.
- Neils Bohr[/small]

 

[gmmastros]

What version of VB are you using?

-George

Strong and bitter words indicate a weak cause. - Fortune cookie wisdom

 

[johnnyplang]

It is VBA. Its part of an operator interface software package. Normally we don't have to go to this level so again pardon my inexperience. There are no app.* that are listed.

johnny

 

[guitardave78]

ah, you may need another forum!
have a look here
forum707

}...the bane of my life!

http://www.fuzzyd.co.uk

 

[johnnyplang]

thanks guitar sorry about that

 

[guitardave78]

no probs

}...the bane of my life!

http://www.fuzzyd.co.uk