Contraseña al abrir formulario
Buenas noches
Quisiera saber como puedo hacer que al abrir un formulario en access 2007 me pida una contraseña. Por mi parte hice esta programación:
En el evento abrir del formulario el cual necesito abrir con contraseña en el generador de código hice esta algoritmia:
Private Sub Form_Open(Cancel As Integer)
Dim PassOk As String
Dim PassTyped As String
PassOk = "agente007"
PassTyped = InputBox("CLAVE DE ACCESSO", "Introduce la clave requerida para acceder a orientacion asistencia", "")
If PassTyped <> PassOk Then
MsgBox "La clave de acceso no es valido"
DoCmd.Quit
Else
Plataformapsicoorientacion. Show (esta parte no entiendo como debo programarla, puesto que no se como invocar para abrir el formulario)
Cancel = -1
End If
End Sub
Por favor ayudame es que no se ya como programar esta vaina.
Quisiera saber como puedo hacer que al abrir un formulario en access 2007 me pida una contraseña. Por mi parte hice esta programación:
En el evento abrir del formulario el cual necesito abrir con contraseña en el generador de código hice esta algoritmia:
Private Sub Form_Open(Cancel As Integer)
Dim PassOk As String
Dim PassTyped As String
PassOk = "agente007"
PassTyped = InputBox("CLAVE DE ACCESSO", "Introduce la clave requerida para acceder a orientacion asistencia", "")
If PassTyped <> PassOk Then
MsgBox "La clave de acceso no es valido"
DoCmd.Quit
Else
Plataformapsicoorientacion. Show (esta parte no entiendo como debo programarla, puesto que no se como invocar para abrir el formulario)
Cancel = -1
End If
End Sub
Por favor ayudame es que no se ya como programar esta vaina.
1 respuesta
Respuesta de Jose Mari Madinabeitia
1