Error en consulta SQL (Urgente)

[yeikler]

Que tal, necesito ayuda con la siguiente consulta a una tabla en sql. Quiero que el resultado sea que coincida un campo con cualquiera de otros treinta.

Esta es la sentencia sql que utilice

<%
fechaBusqueda =trim(Request.Form("fechaBusqueda"))
Lugar =Request.Form("Lugar")
fechaBusqueda = CDATE(fechaBusqueda)

SQL="SELECT * FROM calendario where lugar = '" & lugar & "' AND ( fecha1 = '" & fechaBusqueda & "' or fecha2 = '" & fechaBusqueda & "' or fecha3 = '" & fechaBusqueda & "' or fecha4 = '" & fechaBusqueda & "' or fecha5 = '" & fechaBusqueda & "' or fecha6 = '" & fechaBusqueda & "' or fecha7 = '" & fechaBusqueda & "' or fecha8 = '" & fechaBusqueda & "' or fecha9 = '" & fechaBusqueda & "' or fecha10 = '" & fechaBusqueda & "' or fecha11 = '" & fechaBusqueda & "' or fecha12 = '" & fechaBusqueda & "' or fecha13 = '" & fechaBusqueda & "' or fecha14 = '" & fechaBusqueda & "' or fecha15 = '" & fechaBusqueda & "' or "
SQL = SQL & "fecha16 = '" & fechaBusqueda & "' or fecha17 = '" & fechaBusqueda & "' or fecha18 = '" & fechaBusqueda & "' or fecha19 = '" & fechaBusqueda & "' or fecha20 = '" & fechaBusqueda & "' or fecha21 = '" & fechaBusqueda & "' or fecha22 = '" & fechaBusqueda & "' or fecha23 = '" & fechaBusqueda & "' or fecha24 = '" & fechaBusqueda & "' or fecha25 = '" & fechaBusqueda & "' or fecha26 = '" & fechaBusqueda & "' or fecha27 = '" & fechaBusqueda & "' or fecha28 = '" & fechaBusqueda & "' or fecha29 = '" & fechaBusqueda & "' or fecha30 = '" & fechaBusqueda & "' or fecha31 = '" & fechaBusqueda & "' )"
rs.Open SQL, conex

lugar =rs("id")
Response.Write(id)
rs.close

%>

y este es el error que me da

Tipo de error:
ADODB.Field (0x800A0BCD)
El valor de BOF o EOF es True, o el actual registro se eliminó; la operación solicitada requiere un registro actual.
/espacios/Aprobacion/resultadoBusqueda.asp, línea 25


Mill gracias.......

[Gurrutello]

hola
<%
if rs.eof then
response.write"no se detectarion registros"
else
'muestra los registros
lugar =rs("id")
Response.Write(id)
end if
%>
El error te lo muestra porque algun campo de la base de datos no coincide con tu consulta o bien esta vacio
creo que es por eso
saludos

[yeikler]

Y la sentencia SQL contiene algun error por el cual no traiga nada de la base de datos

[mariano_donati]

Ese error BOF o EOF es true, te lo da cuando no se encuentraron registros de acuerdo a los criterios que especificaste de busqueda. Podes probar haciendo
TuRecordSet.MoveFirst()
Y luego mostrar los registros, aunque esto pocas veces lo he usado, algunas veces me daba error y con eso pude solucionarlo. Lo segundo es asegurarte que efectivamente haya registros que concuerden con esos criterios de busqueda.
Saludos!.

[Myakire]

Complementando la respuesta de mariano_donati: Ese error BOF o EOF es true, te lo da cuando no se encuentraron registros de acuerdo a los criterios que especificaste de busqueda e igualmente intentas utilizar el contenido del RecordSet.

El problema esta en la segunda linea:

rs.Open SQL, conex
lugar =rs("id")

El Open no regresa registros pero sin validación alguna, se intenta asignar el contenido del campo ID de un registro innexistente a la variable lugar

Saludos

[yeikler]

Gracias a todos por sus respuestas, Con su ayuda logre resolver el problema