Won't work with Alpha/Numeric value

  • Thread starter Thread starter Hookfoot
  • Start date Start date
H

Hookfoot

Does anyone know why this won't work with alpha/numeric values? It will work
with integers.

Private Sub txtID_BeforeUpdate(Cancel as Integer)
If Not IsNull(DLookUp("[ID]", "
", "[ID] = " & Me!txtID)) Then
Cancel = True
MsgBox "This ID already loaded", vbOKOnly
End If
End Sub

Any help is appreciated.

Hookfoot
 
You must delimit text strings with ' characters:

If Not IsNull(DLookUp("[ID]", "
", "[ID] = '" & Me!txtID & "'")) Then
 
Back
Top