Script para aparecer o dia da semana.. e o mesm

[FoX Borland 0]

Tem no banco de dados, o campo data (1/05/2004) e o campo semana (1/05/2004)o q eu quero fazer com q o campo data, mostre inves do mes em numero, o nome do mes... e o campo semana, ao aparecer o numero do dia, aparecer o dia da semana ....se alguem poder ajudar!!valeuuuu

[hargon 64]

Faz uma busca no fórum, que a menos de duas semanas eu respondi um tópico postando um código desses.

 

A idéia é quase a mesma.

 

Você apenas tera que pegar o valor do campo data e semana utilizando o cdate, e depois implemente o codigo q postei. :D

[FoX Borland 0]

Hagon, procurei, mais num chei naum!!!você lembra o nome do post???valeu pela atencao

[Marhault 1]

Tipo:

<%data = "02/04/2004"NomeMes = MonthName(Month(data)) 'Retorna o nome do mesNomeDiaSemana = WeekdayName(Weekday(data)) 'Retorna o nome do dia da semanaDataExtenso = FormatDateTime(data, vbLongDate) 'Retorna a data completa por extenso%>

OK?

[FoX Borland 0]

Como eu posso ixibir esse codigo Marhault??Valeu pela ajuda!!!!!!!!!!!

[FoX Borland 0]

EU QUERO FAZER APARECER DESSE MODODESSE MODO01/Abr/04DESSESábadoE DESSE27/Mareu tenho dois campos, os dois são dd/mm/aaaaa

[Marhault 1]

Tipo tenta isso:

<%Data = "03/04/2004"Response.Write Format(Data, "DD/MMM/YY")Response.Write "<br><br>"Response.Write WeekDayName(WeekDay(Data))Response.Write "<br><br>"Response.Write Format(Data, "DD/MMM")%>

Ok?

[FoX Borland 0]

num tah muito legal naum... tentei adaptar e tb naum deu muito certo olha msg q da se eu colocar do jeito q você passou

 

Erro de tempo de execução do Microsoft VBScript (0x800A000D)Tipos incompatíveis: 'Format'

[hargon 64]

Se o servidor for internacional, adiciona essa linha ao seu código:

 

<%Session.LCID = 1046%>

[FoX Borland 0]

Não é internacional... de 1° eu uso o meu pessoal... o IIS do xp sp1se funcionar, depois eu jogo no servidor... Servidor brasileiro, LOCAWEB...Eu adicionei a tal linha e naum adiantou!Dá uma mãozinha ae galera! preciso entregar o novo site até o sábado dia 10!

[Marhault 1]

Tá difícil... HEHEHEHE... Fiz essa Função aí em baixo, acho q resolve agora:

<%Function FormatarData(Data, Tipo)If Tipo = 1 ThenFormatarData = Day(Data) & "/" & MonthName(Month(Data), True) & "/" & Right(Year(Data), 2)ElseIf Tipo = 2 ThenFormatarData = WeekdayName(Weekday(Data))ElseIf Tipo = 3 ThenFormatarData = Day(Data) & "/" & MonthName(Month(Data), True)End ifEnd Function%>

Pra chamar a função é assim:

<%=FormatarData("04/04/2004", 1)%><br><%=FormatarData("04/04/2004", 2)%><br><%=FormatarData("04/04/2004", 3)%>

Ok???

 

PS.: Reparou q hoje é dia 04/04/04 HEHEHEHEHE

[FoX Borland 0]

marhault!FUNCIONOU PERFEITAMENTE COMO EU QUERIA!!!POW CARA! VALEU MESMO PELO GALHO AEW!!!!OBRIGADÃO!!!!