Реализация функции интеллектуального поиска под asp удобна для изучения каждому <%
Функция AutoKey(strKey)
Конст lngSubKey=2
lngLenKey=Len(strKey)
Выберите регистр lngLenKey
Case 0 'Если это пустая строка, перейдите на страницу ошибки
Response.RedirectError.htm
Случай 1 'Если длина равна 1, не задавайте никакого значения
стрНовый1=
стрНовый2=
Case Else 'Если длина больше 1, начните с первого символа строки и пройдите по подстроке длины 2 в качестве условия запроса.
Для i=1 To lngLenKey-(lngSubKey-1)
strSubKey=Mid(strKey,i,lngSubKey)
strNew1=strNew1 и или U_Name, например '% & strSubKey & %'
strNew2=strNew2 & или U_Info, например '% & strSubKey & %'
Следующий
Конец выбора
'Получить полный оператор SQL
AutoKey=Выберите * из T_Sample, где U_Name, например '% & strKey & %' Или U_Info, например '% & strKey & %' & strNew1 & strNew2
Конечная функция
%>