Arquivo para ASP

Função para formatar datas ;)

Posted in ASP, Programação with tags , , on 29 de maio de 2009 by fchevitarese

Opa!

Bom, aqui onde trabalho damos manutenção em um sistema feito anteriormente utilizando a linguagem ASP.
Nesta linguagem formatar a data as vezes pode ser bem complicadinho. Então, mais uma vez em minhas navegadas e “googladas”, encontrei uma função para formatar as datas para ISO, que é o formato padrão.

Como tem um tempinho que encontrei, não me recordo da fonte, mas estou postando aqui, pois foi de grande valia para mim esta função!

Function ISOData(dteDate)
‘Version 1.0
If IsDate(dteDate) = True Then
DIM dteDay, dteMonth, dteYear
dteDay = Day(dteDate)
dteMonth = Month(dteDate)
dteYear   = Year(dteDate)
ISOData = dteYear & _
“-” & Right(Cstr(dteMonth + 100),2) & _
“-” & Right(Cstr(dteDay + 100),2)
Else
ISOData = Null
End If

End Function

Para utilizar a função, você deve chamar a função passando a data a ser formatada como parâmetro.

Tipo assim:

data = IsoData(Date())

Abraços !!

Fred Chevitarese – GNU/Linux

Anúncios