problema con rango de fechas

[cristianf]

Hola a todos, tengo un inconveniente: estoy armando un sistema de reservas en asp con access, en la base de datos tengo un campo fecha ingreso y otro fecha egreso. a traves de un formulario de busqueda estoy intentando que cuando el usuario introduce los rangos de fechas le informe si hay o no disponibilidad, el sistema funciona bien pero no logro dar cuando hay un rango de fechas de por ejemplo 28/02/2006 al 30/02/2006.
Si ingreso el 28/02/2006 todo bien igual con el 30/02/2006 pero no por ejemplo el 29/02/2006 entocces supuse que a traves de un if decirle que si una de las fechas solicitadas es mayor o igual al 28/02/2006 y menor o igual al 30/02/2006 imprima un mensaje de por ejemplo "no disponibilidad". en sintesis si el usuario introduce 26/02/2006 al 29/02/2006 le diga que no existe esa opcion en esos rangos de fechas, el problema es que no doy con el codigo correcto, si alguien me lo explica o me dice algun lugar donde encontrarlo lo agradezco. saludos y gracias de antemano

[monkyta]

Debes de validar las fechas antes de pasarlas como parametro... usa Javascript para hacer eso...
Aca te mando un pedazo de mi codigo que uso para validar las fechas y revisa los de los años bisiesto..

if (month == 2 && (year%4) == 0)
{
if (day <= 0 || day >= 30)
{
alert("Día incorrecto para el mes");
return 0;
}
}
if (month == 2 && (year%4) != 0)
{
if (day <= 0 || day >= 29)
{
alert("Día incorrecto para el mes");
return 0;
}
}

[cristianf]

en realidad quiero hacer lo siguiente, establecer que si alguna de las fechas ingresadas es mayor o igual a la fecha de la base de datos campo "fecha1" y menor o igual a la fecha de base de datos campo "fecha2" me diga que no hay diponibilidad asi lo estoy haciendo

<%
'realizamos la conexión de la Base de Datos
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("hoteles.mdb")
'definimos las variables de busqueda
Dim Temp
'Creamos la sentencia SQL que extrae de la base las páginas que tienen la palabra que buscamos
'buscando con el operador LIKE obtenemos apariciones del substring escrito en el formulario, entre las palabras clave
Temp="Select * From Hoteles Where UCase(fecha1) & (fecha2) like '%" & UCase(Request("dato")) & "%'"
Tabla.Open Temp, Conexion
If Tabla.BOF And Tabla.EOF Then
%>

<p><font face="Tahoma" size="2">Todas las habitaciones disponibles para la fecha <strong><%=Request("dato")%> seleccionada</strong> </font></p>

<%
Else
'aquí comienza el Script que nos muestra los resultados,
'si los encuentra en la tabla
%>
<% if Request ("dato") >= Tabla.Fields ("fecha1") then %>
<% response.write ("cuadruple no disponible") %>
<% else %>
<% response.write ("cuadruple disponible") %>
<% end if %>

<% While Not Tabla.EOF%>

<%
'si encuentra mas de un resultado nos hace una celda mas en la tabla
Tabla.MoveNext
Wend
Tabla.Close
Conexion.Close
End If
%>


actualmente estoy en esta parte <% if Request ("dato") >= Tabla.Fields ("fecha1") then %> pero solo me toma cuando coincide el dato no cuando es mayor .

con respecto a validar las fechas antes de pasarlas no entendi muy bien si es que se deben validar en el archivo que sube a la base datos o en alguna otra, desde ya argadezco mucho tu ayuda y al de quienes puedan hacerlo. salu2.