como recupero las busquedas que se hacen en mi buscador?....plis ayuda

[Manoloweb]

<%

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("base_guia.mdb")

Dim Temp

-------------------->
Temp="Select * From Comercios Where UCase(Categoria) like '%" & UCase(Request("palabra")) & "%'" || UCase(Nombre) like '%" & UCase(Request("palabra")) & "%'" || UCase(Direccion)like '%" & UCase(Request("palabra")) & "%'" || UCase (Telefono) like '%" & UCase(Request("palabra")) & "%'"
-------------------->


Tabla.Open Temp, Conexion
If Tabla.BOF And Tabla.EOF Then
%>


Creo que por ahi va...