sexta-feira, 29 de junho de 2001

Função que retorna o último dia do mês

<%
'--------------------------------------------------------------------
' maxDiaMes
' Função que retorna o último dia do mês
' Criado por Rafael Martins de Ascenção
' Email: iamaz@ig.com.br - ICQ: 118036283
' Colaboraram:
' Adriano Dias (adiasbr@yahoo.com.br)
'--------------------------------------------------------------------


' Nunca esquecendo o Session.LCID
Session.LCID = 1046


function maxDiaMes(mes,ano)
 lDate = DateAdd("m", 1, CDate("01/" & mes & "/" & ano))
 maxDiaMes = Day(DateAdd("d",-1,lDate))
end function


' E para usar, por exemplo para o mês de junho


ultimodia = maxDiaMes(6,2002)
%>



Esta matéria foi postada originalmente no ASP4Developers por Rafael Martins de Ascenção (site), que na época era "também conhecido como Iamaz do news do FX. Programador ASP, ColdFusion. ". Hoje, vai saber...

0 comentários: