Saber o dia da semana de determinada data

[Patrique 0]

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!

 

<%
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")
%>

http://forum.imasters.com.br/public/style_emoticons/default/joia.gif

[Salgado 4]

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!

 

<%
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")
%>

 

:joia:

Só não se esqueça de setar o LCID para Brasil, pois senão retorna no idioma que estiver setado o servidor.

[Patrique 0]

Si si si, professor http://forum.imasters.com.br/public/style_emoticons/default/joia.gif eu nem me atento muito com isso hehehe pois so tenho dim dim pra hospedar em server brazucas hehehehehehe