06/08/2004, 11:03
|
 | Colaborador | | Fecha de Ingreso: diciembre-2003 Ubicación: Antigua Guatemala
Mensajes: 4.032
Antigüedad: 20 años, 4 meses Puntos: 53 | |
| Ejecutar un solo ejemplar de un programa
Prengunta:
¿Cómo ejecutar una sola vez un programa?
Respuesta:
Incluir este código en
Código:
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
__________________ * Antes de preguntar lee las FAQ, y por favor no hagas preguntas en las FAQ
Sitio http://www.geoavila.com twitter: @GeoAvila
Última edición por GeoAvila; 16/08/2005 a las 16:34 |