<%
dia_m = day(now)
dia_s = weekday(now)
mes = month(now)
ano = year(now)
hora = hour(now)
If hora >= "18" And hora < "24" Then
strSaudacao = "TENHA UMA BOA NOITE !"
End if
If hora >= "0" And hora < "12" Then
strSaudacao = "TENHA UM BOM DIA !"
End if
If hora >= "12" And hora < "18" Then
strSaudacao = "TENHA UMA BOA TARDE !"
End if
'Select Case dia_s
' Case "1"
' dia_s = "Domingo"
' Case "2"
' dia_s = "Segunda-feira"
' Case "3"
' dia_s = "Terça-feira"
' Case "4"
' dia_s = "Quarta-feira"
' Case "5"
' dia_s = "Quinta-feira"
' Case "6"
' dia_s = "Sexta-feira"
' Case "7"
' dia_s = "Sábado"
'End Select
Select Case mes
Case "1"
mes = "janeiro"
Case "2"
mes = "fevereiro"
Case "3"
mes = "março"
Case "4"
mes = "abril"
Case "5"
mes = "maio"
Case "6"
mes = "junho"
Case "7"
mes = "julho"
Case "8"
mes = "agosto"
Case "9"
mes = "setembro"
Case "10"
mes = "outubro"
Case "11"
mes = "novembro"
Case "12"
mes = "dezembro"
End Select
teste ="Rio" & ", " & dia_m & " de " & mes & " de " & ano & ". " & " " & strNome
%>
Sábado, 02 de junho, os alunos da 7º série - Unidade Recreio - tiveram um encontro com o que está expresso nas ruas e nas avenidas e nos casarões que resistiram praticamente todos os surtos civilizados pelos quais passou a bem-aventurada São Sebastião do Rio de Janeiro.
O roteiro seguiu a seguinte trajetória: Santa Tereza; Paco: Praça VX e Assembléia; Cinelândia, biblioteca Nacional; Museu de Belas Artes, Teatro Municipal e Câmara Municipal, Catedral; Petrobrás e DNDES.
