[ASP][Code] Data, mês, ano no site

Started by Skayler, 18 de June , 2006, 09:19:30 PM

Previous topic - Next topic

0 Members and 1 Guest are viewing this topic.

Skayler

Ae, comecei a estudar ASP e fiz um simples script que mostra, data, mês e ano no site...
Fui testar, mas deu problema no meu IIS, vou reinstala-lo, mas acho que está tudo certo...
Ta aí
Façam bom aproveito

<%
Option Explicit

Dim nDia, nMes, nAno, nDiaSemana
Dim sDiaSemana, sMes

nDia = day(Date)
nMes = month(Date)
nAno = year(Date)
nDiaSemana = weekdar(Date)

select case nDiaSemana
case 1 sDiaSemana = "Domingo"
case 2 sDiaSemana = "Segunda"
case 3 sDiaSemana = "Terça"
case 4 sDiaSemana = "Quarta"
case 5 sDiaSemana = "Quinta"
case 6 sDiaSemana = "Sexta"
case7 sDiaSemana = "Sábado"
end select

select case nMes
case 1 sMes = "Janeiro"
case 2 sMes = "Fevereiro"
case 3 sMes = "Março
case 4 sMes = "Abril"
case 5 sMes = "Maio"
case 6 sMes = "Junho"
case 7 sMes = "Julho"
case 8 sMes = "Agosto"
case 9 sMes = "Setembro"
case 10 sMes = "Outubro"
case 11 sMes = "Novembro"
case 12 sMes = "Dezembro"
end select

response.write "<font face='Tahoma' size="1 color='red'><strong>"
response.write sDiaSemana & "," & nDia & " de " & sMes & " de " & nAno
response write "</strong></font>"

'Ta ae galera, um script simples de data, mês e hora pra por no site...
'simples, hehehe...
%>

Quem tiver noções de programação, ou até mesmo de inglês, vai entender o code...
Away

Sladrak

Nossa..

Nao sei se eh pq eh 1 simples codigo mas ate eu entendi hehehe...

Tem semelhança com vb.... "select case..." "response.write"....

Bom estudo!