que estoy haciendo mal ?????

[hugorei]

tengo un buscador , el pimer campo es un combo dependiendo de este se efectua la busqueda de los demas campos

el combo es este :

<select name="categoria">
<option value="Seleccione una categoria">Seleccione una categoria</option>
<option value="Resoluciones Directorio">Resoluciones Directorio</option>
<option value="Resoluciones Presidente">Resoluciones Presidente</option>
<option value="Resoluciones FONTAR">Resoluciones FONTAR</option>
<option value="Resoluciones FonCyT">Resoluciones FonCyT</option>
<option value="Resoluciones UCGAL">Resoluciones UCGAL</option>
</select>

luego lo lebanto en la pagina de resultados asi :

strsql = "SELECT * FROM buscador where categoria = '" & Request.Form("categoria") & "' AND UCase(numero) like '%" & UCase(Request("numero")) & "%' AND UCase(fecha) like '%" & UCase(Request("fecha")) & "%' AND UCase(beneficiario) like '%" & UCase(Request("beneficiario")) & "%' AND UCase(palabras) like '%" & UCase(Request("palabras")) & "%' order by "& orden & " "&alf

Set oConn = Server.CreateObject("ADODB.Connection")
oConn.Open "DRIVER={Microsoft Access Driver (*.mdb)}; DBQ="&Server.MapPath("buscador.mdb")

PERO NO FUNCIONA LA CATEGORIA NO LA ENCUENTRA Y COINCIDE CON LAS CATEGORIAS QUE FIGURAN EN LA TABLA -

gracias al que me pueda ayudar

[El_Metallick]

no se supone que la coneccion a la base de datos va primero que la sentencia sql????? brueba poniendolo asi:

Código:

Set oConn = Server.CreateObject("ADODB.Connection")
oConn.Open "DRIVER={Microsoft Access Driver (*.mdb)}; DBQ="&Server.MapPath("buscador.mdb")

strsql = "SELECT * FROM buscador where categoria = '" & Request.Form("categoria") & "' AND UCase(numero) like '%" & UCase(Request("numero")) & "%' AND UCase(fecha) like '%" & UCase(Request("fecha")) & "%' AND UCase(beneficiario) like '%" & UCase(Request("beneficiario")) & "%' AND UCase(palabras) like '%" & UCase(Request("palabras")) & "%' order by "& orden & " "&alf

Saludos

[hugorei]

NO sigue sin funcionar

Mira te pongo la pagina que lo levanta mas detallada

<%
Dim mostrar 'cantidad de registros a mostrar por página
Dim cant_paginas 'cantidad de páginas que recibimos
Dim pagina_actual 'La página que mostramos
Dim registro_mostrado 'Contador utilizado para mostrar las páginas
Dim I 'Variable Loop
categoria = Request.querystring("categoria")
numero= request.querystring("numero")
fecha = request.querystring("fecha")
beneficiario= request.querystring("beneficiario")
palabras= request.querystring("palabras")
orden = request.querystring("orden")
alf = request.querystring("alf")
cantidad = request.querystring("cantidad")
if cantidad="10" then
mostrar = 10
elseif cantidad="20" then
mostrar = 20
elseif cantidad="30" then
mostrar = 30
end if
if orden = "" then
response.redirect "buscador2.asp"
end if

' IF para saber que página mostrar
If Request.QueryString("page") = "" Then
pagina_actual = 1
Else
pagina_actual = CInt(Request.QueryString("page"))
End If

strsql = "SELECT * FROM buscador where categoria = '" & Request.Form("categoria") & "' AND UCase(numero) like '%" & UCase(Request("numero")) & "%' AND UCase(fecha) like '%" & UCase(Request("fecha")) & "%' AND UCase(beneficiario) like '%" & UCase(Request("beneficiario")) & "%' AND UCase(palabras) like '%" & UCase(Request("palabras")) & "%' order by "& orden & " "&alf

Set oConn = Server.CreateObject("ADODB.Connection")
oConn.Open "DRIVER={Microsoft Access Driver (*.mdb)}; DBQ="&Server.MapPath("buscador.mdb")

' creo el RecordSet y defino la cantidad de registros a mostrar
Set RS = Server.CreateObject("ADODB.Recordset")
RS.PageSize = mostrar
RS.CacheSize = mostrar

' Abro la tabla...
RS.Open strSQL, oConn,3,1
'cuento las páginas que se formaron con la variable mostrar
cant_paginas = RS.PageCount

[kikesss]

estoy biendo que falta el .form en algun request