Code source n°3 : Empêche les lancements multiple d'une application
Auteur : P. Cuisinaud
- Taille :
If (UBound(Diagnostics.Process.GetProcessesByName _
(Diagnostics.Process.GetCurrentProcess.ProcessName)) > 0) = True Then
MsgBox("Application deja ouverte !")
End
End If