Archief - ASP: dubbele boeking

DaSpeeD · 4 jun 2005

ik probeer een reservatie systeem te maken voor een school, waar ze voertuigen en lokalen kunnen reserveren.
alles lukt behalve mijn controle op dubbele boekingen, er moet worden gecontroleerd of het item, dag en uur niet hetzelfde is en dit lukt niet.

Code:

<%
Dim cnDB
Dim strConnstring
Dim rstreservatie
dim blninorde

blninorde = true

strConnstring= "DRIVER={Microsoft Access Driver (*.mdb)};DBQ=" & Server.MapPath("gegevens.mdb")
set  cnDB = Server.CreateObject("ADODB.Connection")
cnDB.open strConnstring

set rstreservatie = cnDB.execute("SELECT * from tblreservatie where Datum2 = '" & session("strdatum") & "' and Item = '" & session("stritem") & "' order by Datum DESC")

do while not rstreservatie.EOF
if session("uurvan") >= rstreservatie("Startuur") and session("uurvan") <= rstreservatie("Einduur") or session("uurtot") > rstreservatie("Startuur") and session("uurtot") <= rstreservatie("Einduur") or session("startuur") < rstreservatie("Startuur") and session("uurtot") > rstreservatie("Einduur") then	
			blninorde = false
end if
rstreservatie.MoveNext
loop
cnDB.close
if blninorde = true then
	response.Redirect("verwerkingreservatie.asp")
else
%>
<font size="4" face="arial,helvetica"><strong> Fout in de reservatie! </strong></font>
			<br>
			<br>
			OPGELET!!! De reservatie bestaat al, om te zien wat er reeds is gereserveerd duw op de knop Gereserveerd op de reservatie pagina!
			<br>
			<br>
<a href="reservatie.asp">Probeer opnieuw</a>
<%
end if
%>

killgore · 4 jun 2005

ik denk dat het licht aan het feit dat je zoveel zaken checkt in 1 if en met verscheidene logische operators (and EN or) werkt. Haakjes gebruiken daar zou goed idee zijn denk ik.

servi · 4 jun 2005

geen idee waarom je het je eigen zo moeilijk maakt

maar stel even het volgende :

reservatie 14u00 -> 16u00 op 10 juni
nieuwe reservatie 15u00 -> 17u00 op 10 juni

dan is de SQL-code ( alles tussen '' zijn hier variabelen )

SELECT COUNT(*) FROM tblreservatie WHERE datum2='10/06/05' AND Item='7'
AND ( '15u00' BETWEEN startuur AND einduur )
OR ('17u00' BETWEEN startuur AND einduur )

als je dan een resultaat terugkrijgt wil dit zeggen dat in die tijdspanne dat item al gereserveerd is.

de ASPcode is dan zoiets ongeveer ( urtgezonderd syntaxfouten ) :

set rstreservatie = cnDB.execute("SELECT * from tblreservatie where Datum2 = '" & session("strdatum") & "' and Item = '" & session("stritem") & "' AND ( '" & session("uurvan") & "' BETWEEN startuur AND einduur OR '" & session("uurtot") & "' BETWEEN startuur AND einduur ) ")

if not rstreservatie.EOF
' fout : is al gereserveerd

DaSpeeD · 5 jun 2005

thx voor de code, werkt wel nog niet, maar ik denk dat het probleem ligt aan de wijze hoe de datum wordt gelezen.

Treuer'ken · 7 jun 2005

ik heb hetzelfde probleem gekend,
in de database staat het veld gemarkeerd als datum/tijd
in de resultset waarmee ik het ophaalde stond het ook als datum tijd gemarkeerd.
dit lukte niet om te vergelijken,

in de database laat je het type van het veld op datum/tijd staan
in uw resultset verander je dat type gewoon naar string
dan kan je prima vergelijken en mag je if structuur zolang zijn als je maar wilt.

Mvg Treuer'ken

DaSpeeD · 8 jun 2005

bedankt hopen dat hte nu wel werkt

Archief - ASP: dubbele boeking

DaSpeeD

Legacy Member

killgore

Legacy Member

servi

Legacy Member

DaSpeeD

Legacy Member

Treuer'ken

Legacy Member

DaSpeeD

Legacy Member