codice:
set rs = cn.Execute("SELECT DISTINCT data, categoria FROM gallery order by data")