<%@Language=Vbscript%> <% Dim data if DatePart("w", date) = 1 then Data = "Domingo, " if DatePart("w", date) = 2 then Data = "Segunda-feira, " if DatePart("w", date) = 3 then Data = "Terça-feira, " if DatePart("w", date) = 4 then Data = "Quarta-feira, " if DatePart("w", date) = 5 then Data = "Quinta-feira, " if DatePart("w", date) = 6 then Data = "Sexta-feira, " if DatePart("w", date) = 7 then Data = "Sábado, " Data = Data & DatePart("d", date) if DatePart("m", date) = 1 then Data = Data & " de Janeiro de " & DatePart("yyyy", date) if DatePart("m", date) = 2 then Data = Data & " de Fevereiro de " & DatePart("yyyy", date) if DatePart("m", date) = 3 then Data = Data & " de Março de " & DatePart("yyyy", date) if DatePart("m", date) = 4 then Data = Data & " de Abril de " & DatePart("yyyy", date) if DatePart("m", date) = 5 then Data = Data & " de Maio de " & DatePart("yyyy", date) if DatePart("m", date) = 6 then Data = Data & " de Junho de " & DatePart("yyyy", date) if DatePart("m", date) = 7 then Data = Data & " de Julho de " & DatePart("yyyy", date) if DatePart("m", date) = 8 then Data = Data & " de Agosto de " & DatePart("yyyy", date) if DatePart("m", date) = 9 then Data = Data & " de Setembro de " & DatePart("yyyy", date) if DatePart("m", date) = 10 then Data = Data & " de Outubro de " & DatePart("yyyy", date) if DatePart("m", date) = 11 then Data = Data & " de Novembro de " & DatePart("yyyy", date) if DatePart("m", date) = 12 then Data = Data & " de Desembrto de " & DatePart("yyyy", date) %> ::. Morro do Moreno .::

Fale Conosco
Página Inicial
 
<%=data%>






Valsa de Guarapri

Fonte: Guarapari é o seu nome (1987)
Autor: Pe. Antonio Nunez

Autor: Pedro Caetano

Quer viver o sonho lindo
Que eu vivi?
Vá viver na maravilha
De Guarapari.

Um recanto que os poetas
E os violões
Não conseguem descrever
Nas mais lindas canções.

Pelas suas noites claras,
A lua serena
Vem brindar os namorados
Na areia morena,

Ninguém poderá sonhar
Nem viver o que eu vivi
longe desta maravilha
Que se chama Guarapari.