dlookup funcion 1

[shy216]

Private Sub password_AfterUpdate()

=DLookUp("[password]","tblpasswordMonitor","[password]=forms!frm_pwMonitor![password]")

End Sub

trying to set up a quick pw filter and open if it's true..
what am i missing?

 

[PHV]

Something like this ?
Private Sub password_AfterUpdate()
If Me!password = DLookUp("[password]", "tblpasswordMonitor", "[password]='" & Me!password & "'") Then
' your open stuff here
Else
MsgBox "Invalid password"
End If
End Sub

Hope This Helps, PH.
Want to get great answers to your Tek-Tips questions? Have a look at FAQ219-2884 or FAQ181-2886

 

[shy216]

that worked!! thanks