Dlook up from query if empty cancel (1 Viewer)

Hi guys;

need help please , i designed a form with text field once the user update this text filed with Number (ID) then all field on the form will be filled with data form query based on the ID entered but if the ID not present i need to cancel update and show message box " no record found"

how can i do that.
this the code below .


Private Sub Command1487_Click()


[Drug Name] = DLookup("[Drug Name]", "Recycle_query", "[ID] = " & Me.Text1477 & "")
Order_Date = Now()

End Sub



if the ID dos not exit the to cancel update

Try this


You really should name your controls something meaningful rather than Command1487

Hi. Another option/approach, which I tend to use/prefer more often is DCount() over DLookup(), for cases like this. Cheers!