não lembro agora um método facil de fazer isso, entaum criei uma função pra fazer isso, testa ai: <%
function extenso(data)
mes=split("janeiro,fevereiro,março,abril,maio,junho,julho,agosto,setembro,outubro,novembro,dezembro",",")
dia=split("domingo,segunda,terça,quarta,quinta,sexta,sabado",",")
extenso=dia(weekday(data)-1) & " - " & day(data) & " de " & mes(month(data)-1) & " de " & year(data)
end function
response.write extenso(date())
%>