Oye, yo tengo mi pagina de busqueda de esta forma:
<style fprolloverstyle>A:hover {color: #FFCC66}
</style>
</head>
<body background="images/pagina1.gif" link="#333399" vlink="#333399" alink="#333399">
<p align="center"><font face="Tahoma" size="2"><b><font color="#333399">Resultados obtenidos con
</font></b> <strong><%=Request("Palabra") %></strong></font></p>
<%
Dim Conexion,Tabla
Set Conexion=Server.CreateObject("adodb.connection")
Set Tabla=Server.CreateObject("adodb.recordset")
Conexion.Open "Driver={Microsoft Access Driver (*.mdb)}; " & "Dbq=" & Server.MapPath("libros.mdb")
Dim Temp
Temp="Select * From Skytels Where UCase(pal) like '%" & UCase(Request("palabra")) & "%'"
Tabla.Open Temp, Conexion
If Tabla.BOF And Tabla.EOF Then
%>
<p align="center"><b><font color="#FF0000"><font face="Tahoma" size="2">No se ha encontrado nada con
<%=Request("palabra")%> en la Base de Datos </font></font></b></p>
<%
Else
%>
<div align="center"><center>
<table border="1" cellpadding="0" cellspacing="0" width="77%" height="40">
<tr>
<td width="25%" height="21" bgcolor="#333399">
<p align="center"><strong><font face="Tahoma" size="2" color="#FFFFFF">Titulo</font></strong>
</td>
<td width="25%" height="21" bgcolor="#333399">
<p align="center"><strong><font face="Tahoma" size="2" color="#FFFFFF">Escritor</font></strong>
</td>
<td width="25%" height="21" bgcolor="#333399">
<p align="center"><strong><font face="Tahoma" size="2" color="#FFFFFF">Descripción</font></strong>
</td>
<td width="25%" height="21" bgcolor="#333399">
<p align="center"><strong><font face="Tahoma" size="2" color="#FFFFFF">Fecha</font></strong>
</td>
</tr>
<% While Not Tabla.EOF%>
<tr>
<td width="25%" height="19">
<p align="center"><font face="Tahoma" color="#333399" size="2"><b><%=Tabla.Fields("Titulo")%></b></font></td>
<td width="25%" height="19">
<p align="center"><font face="Tahoma" color="#333399" size="2"><b><%=Tabla.Fields("Escritor")%></b></font></td>
<td width="25%" height="19">
<p align="center"><font face="Tahoma" color="#333399" size="2"><b><%=Tabla.Fields("Descripcion")%></b></font></td>
<td width="25%" height="19">
<p align="center"><font face="Tahoma" color="#333399" size="2"><b><%=Tabla.Fields("Fecha")%></b></font></td>
</tr>
<%
Tabla.MoveNext
Wend
Tabla.Close
Conexion.Close
End If
%>
</table>
</center></div>
<p align="center"> </p>
</body>
</html>
Existiria alguna forma de que quedará similar pero con los cambios de la busqueda avanzada??
De ante mano muchas GRACIAS