Como identificar que el programa esta abierto?

[IP3]

Hola!

Mi duda es la siguiente, yo quiero que un proyecto mio solo se pueda abrir una vez, o sea, abres la aplicación, pero si luego intentas reabrirla teniéndola ya abierta no te deje o te avise que esta abierta, gracias!

Un saludo, compañeros

[CeLaYa]

esto creo que se hace asi:


if  app.PrevInstance then
   'Una instancia del exe ya esta abierta
    end
else
....
end if

[WarGhost]

usar eso no es muy buena idea porque si alguien cambia de nombre el fichero ya se puede abrir.

[xDie]

Yo lo que hago es crear un archivo.. asi

Código [Seleccionar] Expandir


On Error GoTo Fallo
x = GetAttr("C:\NETTLOG.TXT")
'existe
msgbox "Oye palomon ya abriste el programa"
End

Exit Sub
Fallo:
Msgbox "Binevenido al pro!"


En realidad esto lo use en un aplciacion que cuando se inicia por primera vez ejecute determinado form.. pero creo que te puede servir qeu me corrigan los expertos!!!!