Buongiorno, ho il seguente problema:
estraggo una lista di gare
codice:
SQL = "SELECT Gare.CodiceGara, Gare.Data, Gare.TipoGara, Gare.Denominazione, Gare.CodOrg, "
SQL = SQL & "Gare.scadenza, Gare.scadenzaora, Campi.id_spec "
SQL = SQL & "FROM Gare INNER JOIN Campi ON "
SQL = SQL & "Gare.CodiceCampo = Campi.ID "
SQL = SQL & "WHERE Gare.FlgCanc = False "
SQL = SQL & "ORDER BY Gare.Data ASC, Gare.Denominazione ASC "
Set ListaGare = Server.CreateObject("ADODB.Recordset")
ListaGare.open SQL,objConn,3,1
poi la "popolo"
codice:
Do While Not ListaGare.EOF
AppoTipoGara = ListaGare("TipoGara")
%>
<TR ALIGN=center VALIGN=middle>
<TD class=c10c><%=ListaGare("Data")%></TD>
<TD class=c10c><%=AppoTipoGara%><%=ListaGare("id_spec")%></TD>
<TD class=c10l><%=ListaGare("Denominazione")%></TD>
<%
SQL = "SELECT count(*) as totale"
SQL = SQL & " FROM punteggi, giocatori"
SQL = SQL & " where Punteggi.CodiceGiocatore = Giocatori.CodiceGiocatore "
SQL = SQL & " and Punteggi.CodiceGara = " & listagare("codicegara")
Set Iscritti = Server.CreateObject("ADODB.Recordset")
Iscritti.open SQL,objConn,3,1
Iscritti.movefirst
if iscritti("totale") = 0 then
%>
<td class="c10c"></td>
<%
else
%>
<td class="c10c"><%=Iscritti("totale")%></td>
<%
end if
Iscritti.Close
%>
<td class=c10c><%=listagare("scadenza")%>ore:<%=formatDateTime(listagare("scadenzaora"), vbShortTime)%></td>
<%
If listagare("scadenza") => (date) AND listagare("scadenzaora") > time() then
%>
<td class="c10c">">ISCRIVI</td>
<%
else
%>
<td class="c10c">ISCRIZIONI SCADUTE</td>
<%
end if
%>
</TR>
<%
ListaGare.MoveNext
Loop
end if
il mio problema è che alla riga
If listagare("scadenza") => (date) AND listagare("scadenzaora") > time() then
la pagina non tiene conto della scadenza per data ma solo per ora.
nel database ho 2 campi, scandeza (che è la data di termine) e ora (ora del termine)
se l'ora ad esempio è impostata su 12.00 tutte le gare avranno "iscrizioni scadute".
Invece solo le gare con la data e l'ora come da "if" dovrebbero avere iscrizioni scadute.
soluzioni?
grazie