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:




  

Quinta, 27 de Novembro de 2014




Leitura recomendada

Algoritmos Estruturados

Top 5 membros

Últimos membros online

Últimos membros cadastrados



Capa do livro
Projeto de Banco de Dados


Capa do livro
aça um Site


Capa do livro
Analise De Pontos De Funçao





Hostnet

IMD