%@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)
%>
Conte uma história sobre as plameiras
imperiais da Praça da Bandeira, na Prainha que nós
publicaremos no site.
Solte
o verbo, solte a mão. Conte qualquer história:
quem plantou, fatos marcantes da cidade de Vila Velha, um
passeio por entre elas numa tarde de domingo, brincadeiras
de criança, um fato do passado, um namoro, enfim, qualquer
assunto que seja relacionado com aquelas palmeiras.