sicuramente c'è un modo migliore di quello che ho usato io nel mio ultimo programma, ma non ho voglia di impegnarmi ^_^
quindi

crea una variabile di controllo vuota
controllo=""
poi esegui una prima query in cui ordini tutte le informazioni del db per data DESC
e lo scorri completamente con un

while
codice:
data = rs.fields("dataora")
dates=left(replace(data," ",""),10)
if controllo<>dates then
 controllo=rs.fields("dataora") 
 if datediff("d",dates,date())=0 then
  testo="Oggi"
 elseif datediff("d",dates,date())=1 then 
  testo="Ieri"
 elseif datediff("d",dates,date())>1 then
  testo="Giorni scorsi"
 end if
 response.write testo
end if
poi stampi tutto ciò che ti serve

loop