Bonjour,
je vais essayer d'être plus clair que mon titre:
Ce que je veux:
-l'utilisateur lance mon application, il l'utilise, là ok
-l'utilisateur a oublié qu'il a déjà lancé mon application, il essai de la lancer une deuxième foi, là j'ai l'application qui vérifie si elle n'est pas déjà lancée:
Jusque là tout va bien, mais à présent ce que je voudrais, c'est envoyer un truc, je ne sais pas quoi à la première instance, pour qu'elle ouvre la fenetre principale, comme outlook en fait.
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
11
12
13
14 Dim Proc_EnCours As Process = Process.GetCurrentProcess Dim Les_Proc() As Process = Process.GetProcesses() For Each processus As Process In Les_Proc 'Il ne faut pas comparer par rapport à cette instance 'du programme mais une autre (grâce à l'ID) If Not Proc_EnCours.Id = processus.Id Then 'Si les ID sont différents mais de même nom ==> 2 fois le même programme If Proc_EnCours.ProcessName = processus.ProcessName Then MessageBox.Show("Le programme ne peut pas être lancé 2 fois!") Application.Exit() End If End If Next
Cordialement
Partager