%@ Language="vbscript"%>
|
||||||||||||||||||||||||||||||||||||||||||||
<%If Len(Trim(Application("QuantosAgora"))) = 1 Then%> <%=Application("QuantosAgora")%> visitante On-Line. <%Else%> <%=Application("QuantosAgora")%> visitantes On-Line. <%End If%> | <% dim meses(12) meses(1)="Janeiro" meses(2)="Fevereiro" meses(3)="Março" meses(4)="Abril" meses(5)="Maio" meses(6)="Junho" meses(7)="Julho" meses(8)="Agosto" meses(9)="Setembro" meses(10)="Outubro" meses(11)="Novembro" meses(12)="dezembro" dim semana(7) semana(1) ="Domingo" semana(2) ="2ª Feira" semana(3) ="3ª Feira" semana(4) ="4ª Feira" semana(5) ="5ª Feira" semana(6) ="6ª Feira" semana(7) ="Sábado" sem = weekday(date) dia = day(date) mes = month(date) ano = year(date) function diadomes(d) nc = len(dia) if nc < 2 then diadomes = 0&dia else diadomes = dia end if end function data = semana(sem)&", "&diadomes(dia)&" de "&meses(mes)&" de "&ano %> <%=data%> | |||||||||||||||||||||||||||||||||||||||||||
|
|
|||||||||||||||||||||||||||||||||||||||||||
EuSei.com Rede de Banners |
||||||||||||||||||||||||||||||||||||||||||||
Para algum problema contactar: webmaster@mail.eusei.com | ||||||||||||||||||||||||||||||||||||||||||||
EuSei.com All rights reserved.© 1999 - 2007 | ||||||||||||||||||||||||||||||||||||||||||||