Ir para o conteúdo

Saber O Dia Da Semana De Determinada Data


Criado por Patrique, Out 10 2010 00:35

Não há respostas para este tópico
  • Por favor, faça o login para responder

#1 Patrique

Patrique
  • Patrique
  • Colaborador
  • 13 Revisões

Revisou 10 outubro 2010 - 00:35

*
REVISÃO POPULAR!

Segue abaixo um code que eu fiz para mostrar o dia da semana de determinada data.

No meu caso serviu para mostrar ao usuário que dia da semana ele nasceu de acordo com a data criada no registro, mas serviria também para outras coisas, basta usar a mente!

<%
autor: Patrique André (O Gostosão)
perfil: http://forum.imasters.com.br/index.php?/user/31010-patrique/

Function Nasceu(data)

    diasemana = WeekDay(data,vbSunday)
    nomesemana = WeekDayName(diasemana,false,vbSunday)

    If diasemana = 1 or diasemana = 7 Then
        abrevia = "um"
    Else
        abrevia = "uma"
    End If      

    Nasceu = "Você nasceu em "& abrevia &" " & nomesemana

End Function

Response.Write Nasceu("26/08/2010")
%>





1 usuário(s) está(ão) lendo este código

1 membro(s), 0 visitante(s) e 0 membros anônimo(s)