Access - CONTRASEÑAS

 
Vista:

CONTRASEÑAS

Publicado por Cristian (20 intervenciones) el 31/05/2005 14:20:46
Help please!
Tengo una base de datos con tres formularios, para acceder a estos he creado un panel de control. Lo que quiero hacer ahora es que al pinchar sobre el boton que me abre el formualrio A (digamoslo así) me pida una contraseña y logicamente si no es correcta no te deje acceder.
Valora esta pregunta
Me gusta: Está pregunta es útil y esta claraNo me gusta: Está pregunta no esta clara o no es útil
0
Responder
Imágen de perfil de Alejandro

Proteger el acceso a formularios con contraseña

Publicado por Alejandro (4142 intervenciones) el 03/06/2023 00:15:51
1. Agrega un botón en el panel de control para abrir el formulario A.
2. En el evento "Al hacer clic" del botón, escribe el siguiente código VBA:

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
Private Sub btnAbrirFormularioA_Click()
    Dim contraseña As String
 
    ' Solicitar la contraseña al usuario
    contraseña = InputBox("Introduce la contraseña:", "Acceso restringido")
 
    ' Verificar si la contraseña es correcta
    If contraseña = "tu_contraseña" Then
        ' Abrir el formulario A
        DoCmd.OpenForm "NombreDelFormularioA"
    Else
        ' Mostrar un mensaje de error si la contraseña es incorrecta
        MsgBox "Contraseña incorrecta. No tienes acceso al formulario A.", vbExclamation
    End If
End Sub

3. Reemplaza "tu_contraseña" en el código anterior por la contraseña que deseas utilizar para acceder al formulario A.
4. Guarda y prueba el formulario.

Ahora, cuando hagas clic en el botón del panel de control para abrir el formulario A, se te solicitará una contraseña. Si ingresas la contraseña correcta, el formulario se abrirá. De lo contrario, recibirás un mensaje de error y no podrás acceder al formulario.
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar