guarda se questa ti "aggrada"
<% =Ucase(left(weekdayname(weekday(now)), 1)) & left(mid(weekdayname(weekday(now)), 2), 9) &", " & day(now) &" " & Ucase(left(monthname(month(now)),1)) & mid(monthname(month(now)),2) &" " & year(now) %>