Om nån startar ett VB-program två gånger samtidigt, hur kan man sätta focus på den första kopian då?

Thomas

* Ange startup till Sub Main.
* Skapa en modul.
* Lägg in följande kod:
<code>
Public Sub Main()
Dim strTitle As String
If App.PrevInstance Then
strTitle = App.Title
App.Title = ""
Beep
AppActivate strTitle
Else
Form1.Show
End If
End Sub
</code>

Jag kom på nu att programmet man startar inte är det samma som körs.
Av div anledningar så startar man Program1.exe som sen kör igång Program2.exe.
Eftersom App.PrevInstance inte kommer att fungera, hur ska jag göra då?

Thomas

Du kan t.ex. spara ner processid på programmet som inte ska startas dubbelt när det startar. Varje gång som man sedan försöker starta programmen kan de ta och läsa vad id't är och använda ett litet api för att avgöra om det är ett korrekt processid. Om det är det så är programmet igång