beginner w/ FindFirst

[PasseJ]

What do I have to do to get the following code to work?



'Calls up input box to find the desired record
Private Sub cmdFind_Click()
mstrClientLastName = InputBox("Enter the Last Name", "Find")
If mstrClientLastName <> "" Then
mrstClientLastName.FindFirst "fldClientLastName = " & "'" & _
mstrClientLastName & "'"
If mrstClientLastName.NoMatch = True Then
MsgBox "Cannot find " & mstrClientLastName, vbInformation, "Atlantic Marketing"
End If
End If
End Sub

[Lee M.]

Ok here is one problem:

'Calls up input box to find the desired record
Private Sub cmdFind_Click()
mstrClientLastName = InputBox("Enter the Last Name", "Find")
If mstrClientLastName <> "" Then

'Lets look at the name of this string a little closer:

mrstClientLastName.FindFirst "fldClientLastName = " & "'" & _

'Look above here it should be mstrClientLastName
'Set your option explicit

mstrClientLastName & "'"
If mrstClientLastName.NoMatch = True Then
MsgBox "Cannot find " & mstrClientLastName, vbInformation, "Atlantic Marketing"
End If
End If
End Sub