El motor de búsqueda consta de un archivo HTM y un archivo ASP. Utiliza principalmente el componente de SystemObject para lograr su propósito. Tiene funciones potentes y se puede usar directamente después de modificar la interfaz. Por supuesto, es aún mejor agregar un poco de sus propias cosas.
SearchPage.htm
Este archivo HTM se usa para pasar en la condición
<html>
<Evista>
<title> ASP Search Engine Ejemplo </title>
</ablo>
<Body>
<centro>
<Form Method = Post Action = Search.asp>
<Tabla bgcolor =#cc6633 borde = 0>
<tr>
<Td RowsPan = 3 bgcolor =#cc6633 width = 21 Nowrap> </td>
<Td width = 363 Nowrap> <font color =#fffff>
<Input type = text name = searchText size = 22>
<Input type = checkbox name = case>
Altamente sensible </font> </td>
<TD ROWSPAN = 3 ancho = 10>
<Input type = enviar value = OK>
<p>
<Input type = reinse value = clare>
</td>
<Td RowsPan = 3 bgcolor =#cc6633 width = 28> </td>
</tr>
<tr>
<Td width = 363 Nowrap> <font color =#fffff> Resultado de retorno
<Seleccionar nombre = rlength>
<opción valor = 200 seleccionado> mensaje largo </opción>
<opción valor = 100> mensaje corto </opción>
<opción valor = 0> return solo a la conexión </ppection>
</Select>
<Seleccionar nombre = rResults>
<Valor de opción = 10 seleccionado> 10
<Valor de opción = 25> 25
<Valor de opción = 50> 50
</Select>
</font>
</td>
</tr>
<tr>
<Td width = 363 Nowrap> <font color =#fffff> debe incluir:
<Input type = checkbox name = iimage>
imagen
<Input type = checkbox name = izips>
Formato zip
<Input type = checkbox name = iJavas> javascript
</font>
</td>
</tr>
</table>
</form>
</Center>
<dl>
<dd> </dd>
</dl>
</body>
</Html>
------------------------------------------------------------------------
Programa ASP que muestra resultados
Search.asp
<html>
<Evista>
Resultados de búsqueda para <title> '<%= request (searchText)%>' </title>
</ablo>
<Body>
Resultados de búsqueda para <b> '<%= request (searchText)%>' </b> <br>
<%
Const fSoforreading = 1
Dim objfile, objfolder, objsubfolder, objTextStream
Dim Bolcase, Bolfilefound, Boltagfound
Dim strcount, strdetag, strext, strfile, strcontent, strroot, strtag, strtext, strtitle, strtitlel