Red de conocimiento informático - Computadora portátil - Pregunta de búsqueda en el sitio ASP: ¿Busca código para extraer palabras clave de los títulos en las categorías para buscar?

Pregunta de búsqueda en el sitio ASP: ¿Busca código para extraer palabras clave de los títulos en las categorías para buscar?

lt;

Dim Db

Dim Conn

Dim Key

Dim i

Db = "noticias. mdb"

Establecer Conn = Server.CreateObject("ADODB.Connection ")

Conn.Open "Provider = Microsoft.Jet.OLEDB.4.0 Fuente de datos = " amp; Servidor .MapPath(Db)

Dim Rs, Sql

Establecer Rs = Server.CreateObject("adodB.Connection")CreateObject("adodb.recordset")

Clave = Solicitud("clave")

Sql = "SELECCIONAR * DE [noticias] DONDE [tipo]=2 Y título COMO '" amp Clave amp "' ORDEN POR ID DESC"

p>

Rs.Open Sql, Conn, 1, 1

Si no (Rs..EOF y Rs.BOF) entonces

Respuesta.Escriba "Sin comprobar datos"

De lo contrario

Hacer mientras no Rs.Establecer Rs = Nada

Conn.Close

Establecer Conn = Nada

gt;