Check if record is exits in table

[adam23262]

Hi,

I am trying to check if a record exits in a table.


Dim cert As String
Dim existingRec As Variant

existingRec = DLookup("[Certificate]", "[Fire]", "'cert' = 'cert'")

If existingRec = Null Then

Else
MsgBox "The Certificate " & existingRec & " is in the database"

End If



Note - Certificate is a column in the table "Fire"

Problem is that existingRec only finds the first value in the Certificate column,
How do I get to check the entire Certificate column?


Thanks

[June7]

Cannot use = Null

Review http://allenbrowne.com/casu-12.html

If IsNull(existingRec) Then

[alcapps]

existingRec = DLookup("[Certificate]", "[Fire]", "'cert' = 'cert'")

"'cert' = 'cert'" this is the where clause in dlookup

so what are trying to do with this statement?

Usually this is where you would single out the record to see if it has a certificate.

[adam23262]

Hi alcapps,

I am trying to compare cert against the column Certificate, I need to find out if cert is already in the table.

[alcapps]

if certificate is a string use this..
DLookup("[Certificate]", "[Fire]", "[Certificate] = '" & me.cert & "'")
if certificate is a number use this
DLookup("[Certificate]", "[Fire]", "[Certificate] = " & me.cert )


change me.cert to the field name.. me.fieldname

hope this helps..