sexta-feira, 29 de junho de 2012

Como impedir que seu aplicativo seja executado duas vezes ao mesmo tempo

Para impedir que seu aplicativo tenha duas execuções ao mesmo tempo, basta adicionar o código abaixo no evento Load do formulário de inicialização:

Dim i As Integer = 0
For Each processo As Process In Process.GetProcesses()
      If processo.ProcessName = "Nome do seu aplicativo" Then
            i += 1
      End If
Next processo
If i = 2 Then
     
Application.Exit()
End If

O nome do seu aplicativo você obtém ou altera em Solution Explorer / My Project / Application / Assembly Name.

Simples, não?

Nenhum comentário:

Postar um comentário