Continuous Form Problem (Ascending Order)

[dizy8]

Hi All,

I have a continuous form with the code below. After I enter the Recipient, i do get the filtered recipient that I want but all the filtered data are mixed. I want that in my [ID] column to be ascended in order. Please help me for the code. My search button code is below. Thank you so much.

Private Sub btnSearchOut_Click()
Dim strSearch As String
Dim strText As String
strText = Me.txtKeywordOut.Value
strSearch = " SELECT * from tbl_Outgoing where ((Recipient like ""*" & strText & "*"")) "
Me.RecordSource = strSearch
End Sub

[ssanfu]

Add the ORDER BY clause:

Private Sub btnSearchOut_Click()
   Dim strSearch As String
   Dim strText As String

   strText = Me.txtKeywordOut
   strSearch = "SELECT *"
   strSearch = strSearch & " FROM tbl_Outgoing"
   strSearch = strSearch & " WHERE ((Recipient like ""*" & strText & "*""))"
   strSearch = strSearch & " ORDER BY tbl_Outgoing.ID ASC"

   Me.RecordSource = strSearch
End Sub

[dizy8]

Hi Steve!!!

It works perfectly for me!!! Thank you so much for the help!

[ssanfu]

Happy to help. Good luck with your project.


And Welcome to the forum.