<%@ Language=VBScript %> <% ' definindo data no formato brasileiro(dd/mm/aaa) Session.LCID = 1046 'A função retornará o mês atual por extenso. function fnChangeMonth(strMonth, strDirection) if strDirection = "previous" then if strMonth = 1 then tempstrMonth = 12 else tempstrMonth = strMonth - 1 end if else if strMonth > 11 then tempstrMonth = 1 else tempstrMonth = strMonth + 1 end if end if fnChangeMonth = tempstrMonth end function 'função Horario como a Variavel data Function Horario ( Hoje ) ' Estamos criando uma Variavel Dia. Com o dia de Hoje Dia = Day(date) ' Estamos criando uma variável Mes. Com o mês de hoje %> <% if Request("dd") = "" then DisplayDate = Date() else DisplayDate = formatQstring(Request("dd")) end if DisplayMonth = Month(DisplayDate) If len(DisplayMonth) <> 2 then DisplayMonth = "0" & DisplayMonth end if %> <% mes = MonthName(month(DisplayDate), 0) ' Agora criamos uma variável como o ano atual. Ano = Year(date) ' Aqui ajuntamos o Dia, Mes e Ano, tudo na funcao Hoje. Hoje = Dia & " de " & Mes & " de " & Ano 'Agora iremos igualar a Variável da função Horario com a variavel hoje. Para obter a data completa. Horario = Hoje 'Vamos fechar agora a função Horario. End Function %> | RIO RUGBY F. C. | Rio de Janeiro - Brasil
Contate-nos:

Para entrar em contato com o Rio Rugby F. C., você pode utilizar o formaulário ao Lado, o e-mail:
rugby@riorugby.com.br
ou por telefone com o Presidente do Clube:
Rodolfo Carugatti (Tuco)
Fone: 21-9308 3057
Ou por telefone com o Diretor:
Junior
Fone: 21 - 8198-5627
Formulário:
Nome:
E-mail:
Assunto:
Mensagem: