Recordset: Findfirst is finding the wrong record

[jmgibson]

Hi everyone,

I've placed a combo box on a form and asked Access to Find a record based on the selection within the form. Since I leveraged the Access Wizard to do this when adding the combo box, it drops in the following code.

Private Sub Combo31_AfterUpdate()
' Find the record that matches the control.
Dim rs As Object

Set rs = Me.Recordset.Clone
rs.FindFirst "[empNum] = " & Str(Me![Combo31])
Me.Bookmark = rs.Bookmark
End Sub

When I select the value in the combobox (emp id# 123456), the form returns the first CLOSEST match (emp id# 1234). Is there a way to have access return the exact match instead of the first closest match it finds?

 

[MajP]

The reason is you convert it to a string and then treat it like a numeric. Which is it?

rs.findfirst "empNum = '" & str(me.combo31) & "'"
or
rs.findfirst "empNum = " me.combo31

you can not have it both ways.

 

[smedvid]

Hopefully empNum is a string in your table; since you should really only have numerics for values u need to calc. At least that was the rule many many moons ago.

Steve Medvid
IT Consultant & Web Master

http://www.saveourfarm.com

Chester County, PA Residents
Please Show Your Support...

 

[JoeAtWork]

Try taking out the Str function - that adds a space in front of it.

smedvid - I can't think of a good reason why you wouldn't use a number if the value actually is a number, whether you need to calculate it or not.