Cálculo da idade através da data de nascimento


Autor/fonte: Thiago Borges Vieira
Tags: [ idade ]



Digg del.icio.us

Com esta função é possível calcular a idade de alguém através da data de nascimento passada por parâmetro.

<%
'Função que vai calcular a idade
function idade(datanascimento)
	ano_atual=year(date())'Extrai ano do atual
	mes_atual=month(date())'Extrai mes atual
	ano_niver=year(datanascimento)'Extrai ano do nascimento
	mes_niver=month(datanascimento)'Extrai mês do nascimento
	dif_ano=cint(ano_atual)-cint(ano_niver)'Faz a diferença dos anos
	dif_mes=cint(mes_atual)-cint(mes_niver)'Faz a diferença dos meses
	'Verifica se a diferença dos meses é negativa, 
	'se for e pq ainda não fez aniversário
	if (dif_mes<0) then
		idade=cint(dif_ano)-1
	else
		idade=dif_ano
	end if
end function

'Chama a função, enviando a data de nascimento.
'Então é retornado a idade
Response.Write(idade(cdate("08/1/1985")))
%>




Enviado por xKuRt em 22/06/2009 às 08:49


Avaliação

Esta publicação ainda não foi avaliada!


Avaliar:


A avaliação de publicações é restrita a membros cadastrados e logados no nosso site.



Comentários

AvatarEnviado por dddweb em 11/05/2010 às 16:06

Ei esse script esta errado, dependendo da data ele retorna o resultado correto, ora errado. ATENÇÃO

--
Programador da Library Asp

AvatarEnviado por dddweb em 05/05/2010 às 20:23

Muito bom, mas tem que haver uma verificaçao no começo do codigo da function para verificar a validade do argumento passado para a function, alem de ser bom usar a palavra-chave ByRef para parametros por referencia.

--
Programador da Library Asp


Envio de comentário:




  

Sexta, 31 de Outubro de 2014




Leitura recomendada

Lógica de Programação

Top 5 membros

Últimos membros online

Últimos membros cadastrados



Capa do livro
Montagem de Micros para Autodidatas, Estudantes e Técnicos


Capa do livro
Construindo Aplicações Node Com MongoDB e Backbone


Capa do livro
Grafos: Conceitos, Algorítmos e Aplicações





Hostnet

IMD