search table before opening form

[Fonzie]

I have a form with a button that opens a second form. What I need it to do is to search a table to see if a field contains a specific value (equal to field on current form). If the field contains the required value, continue opening second form. If not, just display a message box that says 'Value not entered'. How do you go about this?

 

[PHV]

Have a look at the DLookUp function.

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

 

[Fonzie]

Thanks. I tried entering the following be keep getting an 'Expected:=' error. Whats going on?

DLookup("[assettag]", "[test1]", "[assettag]='"& forms!frmInventory!txtAssetTag &"'")

 

[PHV]

I tried entering the following
Where ?

A starting point:
If IsNull(DLookup("assettag", "test1", "assettag='" & Me!txtAssetTag & "'") Then
MsgBox Me!txtAssetTag & " : Value not entered"
Exit Sub
End If
DoCmd.OpenForm ...

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

 

[PHV]

OOps, sorry for the typo:
If IsNull(DLookup("assettag", "test1", "assettag='" & Me!txtAssetTag & "'")) Then
MsgBox Me!txtAssetTag & " : Value not entered"
Exit Sub
End If
DoCmd.OpenForm ...

 

[Fonzie]

Thanks, that works awesome.

 

[TheAceMan1]

How are ya Fonzie . . .

[blue]PHV[/blue] has you in tow, only I'm thinking more like:

[blue]   Dim Criteria As String
   
   Criteria = "assettag='" & Me!txtAssetTag & "'"
   
   If IsNull(DLookup("[assettag]", "test1", Crireria)) Then
      MsgBox Me!txtAssetTag & " : Value not entered"
   Else
      DoCmd.OpenForm ...
   End If[/blue]

See Ya! . . . . . .