G
Guest
This is the code that I have, I need password1 to be any field in the
password column of the "instructors" table... I don't know how to do it, help
greatly appreciatd.
Private Sub Command29_Click()
If Password5 = "" Or Password5 = Empty Then
MsgBox "No Input Provided", vbInformation, "Required Data"
End If
'If correct password is entered open Employees form
'If incorrect password entered give message and exit sub
If Password5 = Password1 Then
DoCmd.GoToRecord , , acNewRec
Else
MsgBox "Sorry, you do not have access to this form", vbOKOnly,
"Important Information"
Exit Sub
End If
End Sub
password column of the "instructors" table... I don't know how to do it, help
greatly appreciatd.
Private Sub Command29_Click()
If Password5 = "" Or Password5 = Empty Then
MsgBox "No Input Provided", vbInformation, "Required Data"
End If
'If correct password is entered open Employees form
'If incorrect password entered give message and exit sub
If Password5 = Password1 Then
DoCmd.GoToRecord , , acNewRec
Else
MsgBox "Sorry, you do not have access to this form", vbOKOnly,
"Important Information"
Exit Sub
End If
End Sub