Se ne è parlato moltissimo:
purtroppo succede che con access quando il giorno è minore di 12, allora giorno e mese vengono invertiti.
molto tempo fà feci qualcosa di simile per ovviare, anche se ci sono altri metodi:
codice:
dim dtdtSt 'data inizio ricerca
'se valore passato come giorno di inizio dell'intervallo è minore di 12
if request("cmpggSt") <= 12 then
'cambia il giorno con il mese e viceversa nel formato della data
dtdtSt = cdate(dateserial(request("cmpaaSt"),request("cmpggSt"),request("cmpmmSt")))
else
'altrimenti lascia il formato come segue
dtdtSt = cdate(dateserial(request("cmpaaSt"),request("cmpmmSt"),request("cmpggSt")))
end if
'stesso discorso precedente per determinare la fine dell'intervallo di date per la ricerca.
dim dtdtEnd 'data fine intervallo di ricerca
if request("cmpggEnd") <= 12 then
dtdtEnd = cdate(dateserial(request("cmpaaEnd"),request("cmpggEnd"),request("cmpmmEnd")))
else
dtdtEnd = cdate(dateserial(request("cmpaaEnd"),request("cmpmmEnd"),request("cmpggEnd")))
end if
'FINE DELLA DETERMINAZIONE DEL FORMATO