|
|
|
<%
dim vDay,vMonth
if month(now)=1 then
vMonth="jan"
end if
if month(now)=2 then
vMonth="fev"
end if
if month(now)=3 then
vMonth="mar"
end if
if month(now)=4 then
vMonth="abr"
end if
if month(now)=5 then
vMonth="mai"
end if
if month(now)=6 then
vMonth="jun"
end if
if month(now)=7 then
vMonth="jul"
end if
if month(now)=8 then
vMonth="ago"
end if
if month(now)=9 then
vMonth="set"
end if
if month(now)=10 then
vMonth="out"
end if
if month(now)=11 then
vMonth="nov"
end if
if month(now)=12 then
vMonth="dez"
end if
response.write ""
response.write day(now) & " "
response.write vMonth & " "
%> |