SoloCodigo

Programación General => Visual Basic 6.0 e inferiores => Mensaje iniciado por: _EL_DJ_LU en Lunes 12 de Mayo de 2003, 23:56

Título: Re: Iniciar una aplicacion por unica vez
Publicado por: _EL_DJ_LU en Lunes 12 de Mayo de 2003, 23:56
Hola
Como puedo hacer a que mi programa se inicie por una sola vez.
es decir si ya esta ejecutado, que no se pueda ejecutar nuevamente al hacerle doble click .
espero que me entiendan.
gracias
Título: Iniciar una aplicacion por unica vez
Publicado por: observador en Martes 13 de Mayo de 2003, 05:04
Bien... aqui esta el codigo que te permite tverificar si el mismo programa ya esta ejecutandose... y si es asi, ya no permitir ejecutar otra instancia...

Copealo y pegalo en la seccion (General) (Declaraciones) de un formulario...

Private Sub Form_Load()
    If App.PrevInstance Then
        MsgBox "Este programa [" & App.EXEName & ".exe]" & " ya está en ejecución", vbInformation, "Aplicación."
        End 'Terminar esta instancia
    End If
End Sub

Para probarlo, crea el ejecutable y luego desde el explorador dale doble clik, cuando ya este en ejecucion vuelve a darle doble click al archivo y observa lo que pasa...

Bueno... espero te sea util... (Probado en VB5) :comp: