Querying data from a form

[load3d]

When entering data on an Access form, on field change, I want to check to make sure that the data in the field does not match data in an Access query. If the data entered in the form matches a record in the query than I want to throw up a message. (I know how to do messages). I'm learning, please help.

 

[PHV]

Have a look at the DLookUp function.

Hope This Helps, PH.
FAQ219-2884
FAQ181-2886

 

[load3d]

Thanks for the prompt reply. I think this will work once I learn how to use it. As of right now, every time I try and save the record it is throwing up the message.

Dim strservice

strservice = DLookup("[Machine#]", "OutOfService", "[Machine#]= '" & [Forms]![frm_checkinOut]![Assettag] & "'")

If strservice = "1" Then

errmsg7 = MsgBox("This machine is out of service please select another machine", vbOKOnly, "Out Of Service")
Me.Assettag.SetFocus

 

[load3d]

I figured it out. Thanks for your help! I can finally move on to another project.