Propósito: Consulta Palabras clave del artículo en la tabla de artículos
Formato de consulta: Baidu Google Baidu es mejor o Google es mejor Baidu + Google (también puede consultar sin ingresar condiciones)
<!-#includeFile = "conn.asp"->
<%
FunctionsearShsql (tname, lname, str) 'tname-table namelname-column namestr-query
Iftrim (str) = "" entonces
Mysql = "select*de" y tname
Demás
Str = sqlencode (str) 'cadena de consulta de preprocesamiento
Arrstr = Split (Str, "") 'La cadena se procesa con espacios
Umax = Ubound (Arrstr) 'Después de la segmentación, la matriz se divide, determine el número de palabras clave divididas en
Ifumax> 0Then 'Procesamiento de múltiples espacios en la palabra clave "ifuMax> 0Then" comienza desde la segunda dimensión
Fori = 1toUmax
Strtemp = Arrstr (i)
Iftrim (strtemp) = "" thenstrtemp = "/~~~~~~/" 'Los elementos divididos en los que se dividen están vacíos y son reemplazados por caracteres especiales.
Sql = sql & "o" & lname & "me gusta '%" & strtemp & "%'"
Próximo
Endif
Mysql = "select*de" & tname & "where" & lname & "me gusta '%" & Arrstr (0) y "%'" & SQL
Hacer
j = instr (1, mysql, "%/~~~~~/%", 1)
Ifj = 0
Salir
Endif
Mysql = reemplazar (mysql "o" & lname & "como '%/~~~~~~/%'", "")