Prüfen ob Prozess bereits ausgeführt wird Verfasst am: 15.06.2009, 10:28
Beschreibung: Diese Funktion prüft ob das Programm bereits ausgeführt ist, wird dies als True zurückgegeben so kann man das Programm beispielsweise schließen lassen.
Funktion:
Code:
Private Function IsApplicationActive() As Boolean<br /><br /> For Each hProcess As Process In Process.GetProcesses <br /> If (Process.GetCurrentProcess.ProcessName = hProcess.ProcessName) And _<br /> (Process.GetCurrentProcess.Id <> hProcess.Id) Then<br /> Return True<br /> End If<br /> Next<br /> Return False<br /><br />End Function
Beispiel:
Code:
If IsApplicationActive() Then<br /> Me.Close()<br />End If