Ho un piccolo box in cui voglio far comparire gli appuntamenti in programma in base alla data di inizio. E che rimanga visibile fino alla fine dell'appuntamento stesso.
Ma non sto riuscendo a scrivere la condizione in modo corretto.

codice:
Visa3 = "SELECT * FROM comunica where Tipo='eventi' ORDER BY Inizio_evento desc"
RecSet.Open Visa3, objConn, adOpenDynamic, adLockOptimistic
if LEN(RecSet("Inizio_evento")) > 7 Then 
data = RecSet("Inizio_evento")
data1 = RecSet("Fine_evento")
if data1 >= Date() Then%>