Ho una tabella in cui ho 2 date (CheckIn e CheckOut) che rappresentano le date di arrivo e partenza degli ospiti di un albergo;
tabella camera1:
id | . CheckIn . .| CheckOut
1 .| 10/11/2015 | 12/11/2015
2 .| 20/11/2015 | 23/11/2015
prendendo ad esempio questa tabella della camera1, la camera sarà occupata nei giorni:
10/11/2015
11/11/2015
12/11/2015
20/11/2015
21/11/2015
22/11/2015
23/11/2015
ora il problema è che non ho idea di come far capire al sistema le date da far contrassegnare come occupate perché, per come è impostato ora lo script, dovrei scorrere il record in un ciclo "for next" che stampa a schermo il calendario e ad ogni scorrere del record i valori risulterebbero doppi;
nel codice che posterò riesco ad evidenziare a schermo le date in rosso ma solo per l'ultimo record:
p.s.: il database è accesscodice:SQL="SELECT * FROM Camera1 " Set rec = Server.CreateObject("ADODB.Recordset") Set Rec=Conn.Execute(SQL) While (NOT rec.EOF) CheckIn=rec("CheckIn") CheckOut=rec("CheckOut") rec.MoveNext WEnd rec.close Set rec = nothing for p=1 to xxxx IF DateDiff("d",CheckIn,DataCorrente)<0 OR DateDiff("d",CheckOut,DataCorrente)>0 THEN .... fai diventare il carattere della DataCorrente in rosso END IF NEXT

Rispondi quotando