Hi,
I am using the following code to find multiple records
Private sub txtscan_Afterupdate()
intcounter = dcount("style_no","products","STYLE_NO = " & _
txtscan.text
If intcounter = 0 Then
msgbox " No match"
Exit Sub
End If
docmd.ApplyFilter,"style_no = " & txtscan.text
End Sub
Now I want to show all the records it finds for txtscan on the form in datasheet view
I do not want to use the Nav buttons to go through the records
How can I do this???
thanks
Duf
I am using the following code to find multiple records
Private sub txtscan_Afterupdate()
intcounter = dcount("style_no","products","STYLE_NO = " & _
txtscan.text
If intcounter = 0 Then
msgbox " No match"
Exit Sub
End If
docmd.ApplyFilter,"style_no = " & txtscan.text
End Sub
Now I want to show all the records it finds for txtscan on the form in datasheet view
I do not want to use the Nav buttons to go through the records
How can I do this???
thanks
Duf