|
|
|
|
|
|
|
|
Dicas
|
|
|
ASP - Active Server Page (Miscelâneas)
|
|
 |
Título da Dica: Formatar Datas Em Português
|
 |
|
|
|
Postada em 23/10/2003 por ^HEAVY-METAL^
Os Web Developers portugueses têm um problema com os Web Providers, na sua maioria Americanos, e a data que o servidor apresenta é num formato do Português (Europeu), ou seja, os servidores Americanos, apresentam da seguinte form: mm/dd/aaaa, ao passo que para os portugueses seja mais conveniente dd,mm,aaaa.
O processo que eu apresento é bastante simples, não tem nada de programação avançada, nem programação muito complexa.
Eis as poucas linhas que podem escrever.
<%
diasemana=Weekday(date())
if diasemana=1 then
diasemanaB="Domingo"
end if
if diasemana=2 then
diasemanaB="Segunda-feira"
end if
if diasemana=3 then
diasemanaB="Terça-feira"
end if
if diasemana=4 then
diasemanaB="Quarta-feira"
end if
if diasemana=5 then
diasemanaB="Quinta-feira"
end if
if diasemana=6 then
diasemanaB="Sexta-feira"
end if
if diasemana=7 then
diasemanaB="Sábado"
end if
dia=day(date())
mes=month(date())
ano=year(date())
if mes=1 then
mesB="Janeiro"
end if
if mes=2 then
mesB="Fevereiro"
end if
if mes=3 then
mesB="Março"
end if
if mes=4 then
mesB="Abril"
end if
if mes=5 then
mesB="Maio"
end if
if mes=6 then
mesB="Junho"
end if
if mes=7 then
mesB="Julho"
end if
if mes=8 then
mesB="Agosto"
end if
if mes=9 then
mesB="Setembro"
end if
if mes=10 then
mesB="Outubro"
end if
if mes=11 then
mesB="Novembro"
end if
if mes=12 then
mesB="Dezembro"
end if
response.Write( diasemanaB &"
"& dia &" de "& mesB &" de "& ano )
%>
T+,
|
|
|
|
|
