A implementação da função de pesquisa inteligente em asp é conveniente para todos aprenderem<%
Função AutoKey(strKey)
Const lngSubKey=2
lngLenKey=Len(strKey)
Selecione Caso lngLenKey
Case 0 'Se for uma string vazia, vá para a página de erro
Response.RedirectError.htm
Caso 1 'Se o comprimento for 1, então não defina nenhum valor
strNovo1=
strNovo2=
Case Else 'Se o comprimento for maior que 1, comece no primeiro caractere da string e faça um loop pela substring de comprimento 2 como condição de consulta
Para i=1 Para lngLenKey-(lngSubKey-1)
strSubKey=Mid(strKey,i,lngSubKey)
strNew1=strNew1 & Ou U_Name como '% & strSubKey & %'
strNew2=strNew2 & Ou U_Info como '% & strSubKey & %'
Próximo
Finalizar seleção
'Obtém a instrução SQL completa
AutoKey=Selecione * de T_Sample onde U_Name como '% & strKey & %' Ou U_Info como '% & strKey & %' & strNew1 & strNew2
Função final
%>