 |
. |
| <%
If Cint(Month(Date)) = 1 Then
DiaMes = "janeiro"
End If
If Cint(Month(Date)) = 2 Then
DiaMes = "fevereiro"
End If
If Cint(Month(Date)) = 3 Then
DiaMes = "março"
End If
If Cint(Month(Date)) = 4 Then
DiaMes = "abril"
End If
If Cint(Month(Date)) = 5 Then
DiaMes = "maio"
End If
If Cint(Month(Date)) = 6 Then
DiaMes = "junho"
End If
If Cint(Month(Date)) = 7 Then
DiaMes = "julho"
End If
If Cint(Month(Date)) = 8 Then
DiaMes = "agosto"
End If
If Cint(Month(Date)) = 9 Then
DiaMes = "setembro"
End If
If Cint(Month(Date)) = 10 Then
DiaMes = "outubro"
End If
If Cint(Month(Date)) = 11 Then
DiaMes = "novembro"
End If
If Cint(Month(Date)) = 12 Then
DiaMes = "dezembro"
End If
varMes = DiaMes
varDia = Day(Date)
If Day(Date) < 10 Then
varDia = 0&Day(Date)
End If
varHora = Hour(Time)
If Hour(Time) < 10 Then
varHora = 0&Hour(Time)
End If
%>
|
 |
INSCRIÇÕES ABERTAS |
|
 |
. |
|
|
 |
Notícias |
|
