here is the code I have to compare text in a db:
Do Until objRS.EOF or bolFound
   If (StrComp(objRS("Name"), strName, vbTextCompare) = 0) Then
    'found it
    bolFound = True
  Else
    objRS.MoveNext
  End If
Loop
I need something to do the same thing with an integer field. I don't recall how to do this right now.