我正在使用下面的代码使用姓氏和选定状态填充 ajax 自动完成文本框。因此,如果用户键入“Jones”,它将填充姓氏类似于“Jones”的所有行。是否可以添加另一个参数以便用户可以键入“Jones, John”?所以它也会查找 ", John" ?谢谢!
Public Function GetCompletionList(prefixText As String, count As Integer, ByVal contextKey As String) As String()
Try
Dim Con As SqlConnection
Dim cmd As SqlCommand
Con = New SqlConnection
Dim test As String
test = contextKey
Con.ConnectionString = ""
Con.Open()
cmd = New SqlCommand
cmd.Connection = Con
'cmd.CommandText = "SELECT NPI, [Entity Type Code], [Provider Last Name (Legal Name)], [Provider First Name], [Provider Business Mailing Address City Name] FROM NPIData WHERE [Provider Last Name (Legal Name)] LIKE @Provider + '%' AND [Provider Business Mailing Address City Name] = @State"
cmd.CommandText = "SELECT NPI, [Entity Type Code], [Provider Last Name (Legal Name)], [Provider First Name],[Provider First Line Business Mailing Address], [Provider Business Mailing Address City Name], [Provider Business Mailing Address State Name], [Provider Business Mailing Address Postal Code] FROM NPIData WHERE ([Provider Business Mailing Address State Name] = @State) AND ([Provider Last Name (Legal Name)] LIKE N'%' + @Provider + N'%') ORDER BY [Provider First Name]"
cmd.Parameters.AddWithValue("@Provider", prefixText)
cmd.Parameters.AddWithValue("@State", contextKey)
Dim customers As List(Of String) = New List(Of String)
Dim reader As SqlDataReader = cmd.ExecuteReader()
While reader.Read
customers.Add(reader("Provider Last Name (Legal Name)").ToString + ", " + reader("Provider First Name").ToString + " " + reader("Provider First Line Business Mailing Address").ToString + " " + reader("Provider Business Mailing Address City Name").ToString + ", " + reader("Provider Business Mailing Address State Name").ToString + " " + reader("Provider Business Mailing Address Postal Code").ToString + " " + reader("NPI").ToString)
End While
Con.Close()
Return customers.ToArray
Catch ex As Exception
End Try
End Function