Ejecutar un solo ejemplar de un programa

Iniciado por ANTRAX, Julio 26, 2010, 10:19:50 AM

Tema anterior - Siguiente tema

MIGUE21 y 4 Visitantes están viendo este tema.

Imprimir
Ir Abajo Páginas1
Acciones del Usuario
Julio 26, 2010, 10:19:50 AM Ultima modificación: Julio 08, 2011, 09:25:14 AM por ANTRAX
Incluir este codigo en el programa:

Código: vb
Private Sub Form_Load()
Dim Ya_Existe As Integer
Ya_Existe = App.PrevInstance
If Ya_Existe <> 0 Then
MsgBox "El Programa ya se esta ejecutando", 0 + 48, "News"
End
End If
End Sub

Imprimir
Ir Arriba Páginas1
Acciones del Usuario