Bonjour,
Au lancement de mon application, je voudrais pouvoir tester si une instance de mon application existe déjà pour ne pas le lancer 2 fois de suite ....
Voici ma procédure:
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17 Private Sub PROC_VERIF_INSTANCE() Dim i As Integer = 0 Try For Each RunningProcess In Process.GetProcessesByName("Gestion De Recrutement") i = i + 1 If i = 2 Then MsgBox("Une instance de Gestion de Recrutement est déjà lancée !", vbCritical) Me.Close() Exit Sub End If Next Catch err As Exception MsgBox(err.ToString(), MsgBoxStyle.Critical, "Erreur PROC_VERIF_INSTANCE!") End Try End SubLe problème est qu'il m'affiche un rapport d'erreur a envoyer a Microsoft !
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10 Public Sub New() ' Cet appel est requis par le concepteur. InitializeComponent() ' Ajoutez une initialisation quelconque après l'appel InitializeComponent(). Call PROC_VERIF_INSTANCE() End Sub
Que faire pour éviter cela ?
Merci
Partager