Search Text instead of number

[shah1419]

</Code>
Private Sub Combo238_AfterUpdate()
' Find the record that matches the control.
Dim rs As Object
Set rs = Me.Recordset.Clone
rs.FindFirst "[GR No] = " & Str(Nz(Me![Combo238], 0))


If Not rs.EOF Then Me.Bookmark = rs.Bookmark
End Sub
<code\>

this query find the number in unbound combo box...like 34, 56, 78, 89
but when i want to search 13mt-01 it gives me error:
how i can find the text like in marron color....

[Missinglinq]

Have a look at Daniel's response where you double-posted the question:

http://www.utteraccess.com/forum/Sea...-t2009528.html

Linq ;0)>

[Dal Jeanis]

If [GR no] is a text field, you might try putting single-quotes around your search:

rs.FindFirst "[GR No] = '" & Str(Nz(Me![Combo238], 0)) & "'"

If it's a number field, then that value can never be found there.

[ipisors]

Private Sub Combo238_AfterUpdate()
' Find the record that matches the control.
Dim rs As Object
Set rs = Me.Recordset.Clone
rs.FindFirst "[GR No] = '" & Me.Combo238 & "'"
If Not rs.EOF Then Me.Bookmark = rs.Bookmark
End Sub