Evitar copia de aplicación access

Que código debo poner para que al iniciar una aplicación access lo primero que haga sea buscar un archivo de verificación en alguna parte del disco y si no lo encuentra que salga y de un mensaje de error de aplicación. Es para evitar que se pueda ejecutar en caso de que alguien copie la aplicación.

1 Respuesta

Respuesta
1

No es exactamente lo que pides, pero mira este ejemplo:

http://siliconproject.com.ar/neckkito/index.php/ejemplos-explicados/seguridad/92-ejemplos-explicados/ejemplos-de-seguridad/119-bd-ejecutable-en-un-solo-pc

Para hacer lo que pides, tienes que tener un formulario que se cargue automáticamente al iniciar la aplicación, y en el evento Al cargar del mismo, le pones este código:

Private Sub Form_Load()
Const miArchivoControl As String = "RutaCompletaArchivo"
Dim miArchivo As String
miArchivo = Dir(miArchivoControl)
If miArchivo = "" Then DoCmd.Quit
End Sub

Donde deberás cambiar lo que está en negrita por la ruta completa, nombre y extensión del archivo que quieres comprobar su existencia. Por ejemplo, si el archivo se llama ControlAccess.txt y está en C:\Windows, tendrás que poner:

Const miArchivoControl As String ="C:\Windows\ControlAccess.txt"

Añade tu respuesta

Haz clic para o

Más respuestas relacionadas