codice:
Set objConn = Server.CreateObject("ADODB.Connection")
objConn.Open "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & server.MapPath("mdb-database/db.mdb")
Set RecSet = Server.CreateObject("ADODB.Recordset")
Visa3 = "SELECT * FROM comunica where Tipo='eventi' and Inizio_evento >= date() ORDER BY Inizio_evento asc"
RecSet.Open Visa3, objConn, adOpenDynamic, adLockOptimistic
if DateDiff("d",Date,RecSet("Fine_evento")) >0 then %>
Ho modificato il codice in questo modo, ma ad uncerto punto mi viene fuori un errore:
Tipo di errore:
(0x80020009)
Eccezione.
default.asp, line 70
la linea 70 è quella in rosso
La criticità si manifesta perchè ho 2 eventi con queste date:
Inizio_evento Fine_evento
26/11/2004 28/11/2004
27/11/2004 05/12/2004
Il tutto funziona fino al 27/11, dopo mi viene fuori eccezione
allora ho modificato la query aggiungedo
codice:
Visa3 = "SELECT * FROM comunica where Tipo='eventi' and Inizio_evento >= date() or Fine_evento >=date() ORDER BY Inizio_evento asc"
A questo punto il 28/11 mi dice che non ci sono eventi in programma.