Comparar horarios!!!

[3LmI]

Buenas tardes....

Tengo un formulario en ASP el cual me sirve para hacer una reservacion de una sala. dentro de ese formulario coloco el o los dias a reservar y el horario en el cual se va a reservar...
El problema que tengo es que no se como hacerle para cuando se quiera volver a reservar ese horario no lo permita, el usario tendria que cambiar el horario,
tengo que comparar el horario que esta ingresando el usuario con el que tengo almacenado en la base de datos, se supone que se puede reservar el mismo dia pero en diferente horario...

Please alguien me puede ayudar.....

Se lo agradecere mucho....

[Adler]

Hola

Puedes usar Between

Select campo from tabla where Between campo #"&inireserva&"# and #"&finreserva&"#

if not rs.eof then
' no aceptas la reserva
else
' la aceptas

Suerte

[3LmI]

Okas gracias voy a probar ahrita te comento como me fue.........
Gracias ke tengas buen dia...........

[3LmI]

Holas bueno antes que nada eh estado investigando y efectivamente la opcion mejor es between pero tengo una duda puedo hacer dos comparaciones en un solo where

es decir esto...

sql = "Select * From reservsala where nom_sala = "&nombresala&" and fecha_inicio between " &fechaini& " and " &fechater& " ;"

o tengo k hacerlo por separado????

[3LmI]

es ke manda un error en el and........

[JuanRAPerez]

Iniciado por 3LmI

es ke manda un error en el and........

y el error es?

[Adler]

Hola

JuanRa mira este post, es que lo ha duplicado, creo que con eso ya estaría solucionado

[3LmI]

Ok creo ke fue sin kerer no me di cuenta, pero es ke aun no me sale y no se por ke =( gracias de todas maneras

[Adler]

Hola

¿Has probado lo que te indiqué en el anterior post?

+ En un solo campo de texto introduces la fecha de inicio y de finalización
hreserva = "21/10/2008 09:00:00-21/10/2008 13:00:00"

+ Haces un split
particion = split(hreserva,"-")

+ Ahora la consulta
sql = "Select * From reservsala where nom_sala = "&nombresala&" and fecha_inicio between '" &particion(0)& "' and '" &particion(1)& "' ;"

Suerte

[3LmI]

Mira tengo un pequeño problema, las hora y fecha se capturan por separado, lo que hago es juntarlo en una variable y hacerlo como tu me comentas, ahora me manda un error en el nombre de la sala me dice que el campo no es valido :S te pondre un poco del codigo espero me puedas ayudar =) gracias....

nombresala = Request.Form("nomsala")
clavepers = Request.Form("txtclave")
nombre = Request.Form("txtnombre")
gerencia = Request.Form("gerencia")
departamento = Request.Form("depto")
curso = Request.Form("txtcurso")
cantpers = Request.Form("txtpersonas")
inicio1 = Request.Form("iniciodia")
inicio2 = Request.Form("iniciomes")
inicio3 = Request.Form("inicioano")
termino1 = Request.Form("terdia")
termino2 = Request.Form("termes")
termino3 = Request.Form("terano")
hinicial = Request.Form("horainicial")
minicial = Request.Form("minutinicial")
hfinal = Request.Form("horafinal")
mfinal = Request.Form("minutfinal")
cafeteria = Request.Form("seleccion")
propor = Request.Form("txtproporcionado")
tiposala = Request.Form("Salas")
observaciones = Request.Form("txtobser")

fechaini = inicio1 &"/"& inicio2 &"/"& inicio3 &" "& hinicial &":"& minicial
fechater = termino1 &"/"& termino2 &"/"& termino3 &" "& hfinal &":"& mfinal

'"21/10/2008 09:00:00-21/10/2008 13:00:00"

hreserva = fechaini&"-"&fechater

particion = split(hreserva,"-")

sql = "Select * From reservsala where nom_sala = "&nombresala&" and fecha_inicio between '" &particion(0)& "' and '" &particion(1)& "' ;"
Set rs = Server.CreateObject("ADODB.Recordset")
rs.Open sql, conn, 3, 3

if rs.EOF or rs.bof then

rs.AddNew
rs.fields("nom_sala")=nombresala
rs.fields("clave") = clavepers
rs.fields("nombre") = nombre
rs.fields("gerencia") = gerencia
rs.fields("departamento") = departamento
fecha = Now()
fechaactual = Day(fecha) & "/" & Month(fecha) & "/" & Year(fecha)
rs.fields("fecha_soli") = fechaactual
fechaini = inicio1 &"/"& inicio2 &"/"& inicio3
rs.fields("fecha_inicio") = fechaini
fechater = termino1 &"/"& termino2 &"/"& termino3
rs.fields("fecha_termi") = fechater
rs.fields("dur_inicial_hrs") = hinicial
rs.fields("dur_inicial_min") = minicial
rs.fields("dur_final_hrs") = hfinal
rs.fields("dur_final_min") = mfinal
rs.fields("curso") = curso
rs.fields("cantidad") = cantpers
rs.fields("serv_cafe") = cafeteria
rs.fields("proporcionado_por") = propor
rs.fields("observaciones") = observaciones
rs.fields("tipo_sala") = tiposala
rs.update
%>

<Script Language="VBScript" >
msgbox "Datos Guardados Correctamente"
a = window.open("reservacion.asp", "_self")
</Script>

<% else%>
<Script Language="VBScript" >
msgbox "Datos no Guardados"
a = window.open("reservacion.asp", "_self")

</Script>

<%end if%>

[Adler]

Hola

¿Cual es el erro? ¿qué tipo de dato te trae nomsala, texto o númerico?

texto -- '"&nombresala&"'
númerico -- "&nombresala&"

Suerte

[3LmI]

Hola Compañero =) Antes que nada gracias por tu ayuda y paciencia...
Ya me guarda, si mil disculpas el tipo era de texto, pero aun asi no me hace la consulta, si me lo guarda aun estando esa reservacion existente...

[Adler]

Hola

En el campo inicio_fecha ha de aparacer esto: 21/10/2008 09:00:00-21/10/2008 13:00:00, así que lo que tienes que hacer es englobarlo todo en un solo campo

rs.AddNew
fechaini = inicio1 &"/"& inicio2 &"/"& inicio3 &" "& hinicial &":"& minicial &"-"&termino1 &"/"& termino2 &"/"& termino3 &" "& hfinal &":"& mfinal
rs.fields("fecha_inicio") = fechaini

Cuando consultes fecha_inicio, veras que si funciona

Suerte

[3LmI]

Hola Adler
Efectivamente si lo hace, ahora solo me queda una duda, necesito realizar una consulta, donde me muestre solo las reservaciones (por ejemplo) del mes de diciembre.

Yo hice algo parecido a lo que me dijiste del split no se si sea la mejor forma de usarlo pero no me muestra nada
Espero me puedas decir o dar una idea xD te lo agradecere infinitamente (kiss) xD gracias...

[Adler]

Hola

Lo más sencillo sería crear un nuevo campo en la bd para el mes y aprovechando el insert, insertar el mes de la reserva. Si esto no te convence se puede hacer otras cosas. Ya me dirás.

Suerte

[3LmI]

Me parece una opcion =)
ahora tengo un pequeño problema :S
Cuando quiero reservar en esa misma fecha pero en diferente horario no me deja supongamos si tengo reservado de 8 a 9 y quiero reserva de 10 a 12 me dice que ya esta ocupada la sala sera que se pueda solucionar????

[JuanRAPerez]

ummmm

sera por

Código asp:

sql = "Select * From reservsala where nom_sala = "&nombresala&" and fecha_inicio between '" &particion(0)& "' and '" &particion(1)& "' ;"
 

sera que la fecha es solo la fecha y no incluye las horas???

porque mejor no se hace un sql algo como

select * from mitabla
cuando sala = sala
y fecha >= '20081101' y fecha <= '20081101'
y horainicial >= '08' y horafinal <= '10'

????

no se hoy ando hilvanando
hahahaha

[Adler]

Hola

Lo acabo de probar y funciona correctamente

Horas reservadas de una sala (10)
21/10/2008 09:00:00-21/10/2008 10:00:00
21/10/2008 12:00:00-21/10/2008 13:00:00

Hora que se quiere reservar de la misma sala (10)
21/10/2008 11:00:00-21/10/2008 12:00:00

y la consulta me dice que está libre

Suerte

[3LmI]

Hola Adler, quiero agradecerte por toda tu ayuda, de verdad tuviste mucha paciencia para conmigo y eso se agradece.
Ya termine y si mil disculpas ya sale jeje solo era cuestion de checar bien.....
Solo faltan algunos retoques pero eso es mas facil =)

Mis mejores deseos para ti =) que tengas un excelente dia =)
Y gracias....