calcular edad automaticamente con fecha de nacimie

[lexus]

Hola a todos


alguien sabe como hacer para que se me calcule la edad de alguien automaticamente:

primero introduciendo en un formulario los datos de nacimiento dia/ mes / año /

y que comparandoce con la fecha de hoy se calcule automaticamente todos los dias para que se cambie el numero en otro campo en mi base de datos edad?

por ejemplo si anteriormente coloque que nací en 05/11/1980 ó 05/11/80 y compare con la fecha de hoy 18/06/2002 entonces tengo 21 años... y asi todos los dias mire si cumplo años o no..


GRacias... no se si me explique bien...

<img src="http://www.lexus.com/images/nav/nav_i_logo.gif" width="109" height="47" alt="Lexus" border="0">

[g_susdaniel]

colokas esta funcion:

Function Age (varBirthDate)
Dim varAge

If IsNull(varBirthdate) then Age = 0: Exit Function

varAge = DateDiff(&quot;yyyy&quot;, varBirthDate, Now)
If Date &lt; DateSerial(Year(Now), Month(varBirthDate), _
Day(varBirthDate)) Then
varAge = varAge - 1
End If
Age = CInt(varAge)
End Function


'luego... en tu page...

fecha_nac = 'la fecha de nacimiento
Response.Write Age(fecha_nac)

<div align=right><embed src="http://www.jesusdaniel.venezuela.com/jd.swf" height=25 width=200 wmode="transparent"></embed><br>Usuario # 3359 en los foros</div>

[lexus]

Hola, gracias por la respuesta, la verdad no te entendi muy bien..

tengo un formulario con 3 campos: nacimientodia, nacimientomes, nacimientoano

que se guardan en una base de datos en 3 campos con los mismos nombres, lo que deseo hacer es que cuando se cree por primera vez me calcule la edad automaticamente con los datos que ingrese, y luego en la pagina de consulta donde veo los datos me aparezca la fecha de nacimiento y la edad calculada...

pero aparte de eso quiero hacer que todos los dias que se abra esa pagina para ver los datos ella compare la fecha de hoy con la fecha de nacimiento y si a cumplido años cambie la edad y asi sucesivamente;;; me explico?


gracias por la colaboracion....

<img src="http://www.lexus.com/images/nav/nav_i_logo.gif" width="109" height="47" alt="Lexus" border="0">

[g_susdaniel]

kreo ke si entiendo...

bueno akis esta el codigo de la funcion...

---------------------
Function Age (varBirthDate)
Dim varAge

If IsNull(varBirthdate) then Age = 0: Exit Function

varAge = DateDiff(&quot;yyyy&quot;, varBirthDate, Now)
If Date &lt; DateSerial(Year(Now), Month(varBirthDate), _
Day(varBirthDate)) Then
varAge = varAge - 1
End If
Age = CInt(varAge)
End Function

--------------------------------
Ese codigo lo vas a colocar al principio de tu pagina... luego haces tu pagina tal y como la kieras y con el recorset llamas a los valores de los campos y los guardas en una variable

fecha_nac = rs(&quot;campo_dia&quot;) &amp; &quot;/&quot; &amp; rs(&quot;campo_mes&quot;) &amp; &quot;/&quot; rs(campo_anio&quot;)

Response.Write Age(fecha_nac)

Es una forme ke se me ocurre, pero yo la uso guardando la fecha completa de nacimiento en un solo campo y
Response.Write Age(rs(&quot;fecha_nac&quot;))

el rs es el objeto RecordSet


<div align=right><embed src="http://www.jesusdaniel.venezuela.com/jd.swf" height=25 width=200 wmode="transparent"></embed><br>Usuario # 3359 en los foros</div>

[lexus]

ok voy a probarlo y te aviso, de todas maneras muchas gracias por tu tiempo y ayuda..


suerte


LEXUS

<img src="http://www.lexus.com/images/nav/nav_i_logo.gif" width="109" height="47" alt="Lexus" border="0">

[zeus_bsas]

g_susdaniel, vi tu respuesta y trate de implementar la funcion para calcular la edad pero me daba siempre 102, siempre. Yo no se nada de nada, si tenes algo de tiempo, no podrias verificarlo, y si funciona escribir el codigo en detalle que hay que poner en la pagina? Gracias.

[lexus]

Hola MUCHAS GRACIAS me funcionó perfectamente, me muestra lo que queria y cada año lo cambia automaticamente

pero lo malo de esto es qeu lo cambia solo en la pagina donde lo veo, no se cambia automaticamente en la base de datos, osea que de todos modos me tocaria undir un boton para actualizar el campo edad y guardar su valor en la base de datos..

CREO que es imposible que se actualice automaticamente en la base de datos... al menos que hubiera algo que cuando undiera click en otro enlace osea cuando saliera de la pagina donde esta la edad se actualizara o enviara a la base de datos la edad nueva..


si alguien conoce algo para solucionar esto le agradeceria...

muchas gracias de todos modos por tu colaboracion ya solucionaste uno de mis problemas....

<img src="http://www.lexus.com/images/nav/nav_i_logo.gif" width="109" height="47" alt="Lexus" border="0">

[g_susdaniel]

g_susdaniel, vi tu respuesta y trate de implementar la funcion para calcular la edad pero me daba siempre 102, siempre. Yo no se nada de nada, si tenes algo de tiempo, no podrias verificarlo, y si funciona escribir el codigo en detalle que hay que poner en la pagina? Gracias.

Revisa tu codigo, yo lo tengo implementado en mas de una pagina y me funciona a la perfeccion, y vaya ke he probado varios...

Hola MUCHAS GRACIAS me funcionó perfectamente, me muestra lo que queria y cada año lo cambia automaticamente

pero lo malo de esto es qeu lo cambia solo en la pagina donde lo veo, no se cambia automaticamente en la base de datos, osea que de todos modos me tocaria undir un boton para actualizar el campo edad y guardar su valor en la base de datos..

CREO que es imposible que se actualice automaticamente en la base de datos... al menos que hubiera algo que cuando undiera click en otro enlace osea cuando saliera de la pagina donde esta la edad se actualizara o enviara a la base de datos la edad nueva..

Para ke kieres un campo con la edad, cuando tienes la fecha de nacimiento y puedes imprimir la edad de una manera muy funcional sin andar rebuscando mas... De todas maneras a simple vista no se me ocurre una manera sencilla de hacerlo como para el tiempo ke tengo ahorita. Y me sigue pareciendo un desperdicio de tamaño en la BD.


<div align=right><embed src="http://www.jesusdaniel.venezuela.com/jd.swf" height=25 width=200 wmode="transparent"></embed><br>Usuario # 3359 en los foros</div>

[lexus]

Hola


la verdad si es necesario tener el campo de edad en mi base de datos, proque el cliente pide una busqueda por edad de cada empleado y si no hay ese campo entonces no lo busca, y ese campo debe estar actualizado constantemente (automaticamente como me explicaste).


Gracias

como te dije anteriormente me funciona muy bien lo que me dijiste y sin el campo de edad pero lo ideal es que se actualize la base de datos tambien para poder hacer las busquedas..

gracias por tu tiempo y colaboracion..

<img src="http://www.lexus.com/images/nav/nav_i_logo.gif" width="109" height="47" alt="Lexus" border="0">

[lexus]

disculpa otra preguntica, si por ejemplo utilizo ese misma funcion para saber el tiempo que lleva una persona trabajando en la empresa ingreso el dia/mes/año y lo compara con la fecha actual como lo hiciste en tu explicacion, pero me di cuenta de una cosa, si el empleado lleva apenas unos dias o unos meses no funciona...


no hay alguna forma de hacer que calcule el tiempo en dias, meses, años?


en otra parte que tambien utilice tu funcion hice lo siguiente:
varios hijos de una persona con su respectiva fecha de nacimiento.. son 5 campos en total. pero no siempre una persona tiene 5 hijos por ejemplo puse solo 3 osea que deje los otros 2 campos vacios y me salio un error...como se prodria solucionar esto?



gracias por tu colaboracion NUEVAMENTE.
si no sabes, pido colaboracion de todos.

<img src="http://www.lexus.com/images/nav/nav_i_logo.gif" width="109" height="47" alt="Lexus" border="0">

[lexus]

me autorespondo

de probar y probar pude calcular el tiempo por dias meses o años, solo es cambiar yyyy por d para dias o por m para meses


Function Age (varBirthDate)
Dim varAge

If IsNull(varBirthdate) then Age = 0: Exit Function

varAge = DateDiff(&quot;yyyy &quot;, varBirthDate, Now)
If Date &lt; DateSerial(Year(Now), Month(varBirthDate), _
Day(varBirthDate)) Then
varAge = varAge - 1
End If
Age = CInt(varAge)
End Function



espero les sea util, sirve para muchas cosas.

<img src="http://www.lexus.com/images/nav/nav_i_logo.gif" width="109" height="47" alt="Lexus" border="0">

[epa2]

¿porque no pruebas a crear una consulta de tu BD por la edad y luego te vas a Access y le dás a crear página en internet y colocas esa página basada en la consulta en internet?

No lo he hecho nunca pero en un buen manual de access a fondo te lo cuenta.

Saludos

<html>
<body>
<p align="left"><font color="#FF0000" face="Comic Sans MS" size="2">Aprendiz
de todo y maestro de nada[/CODE]</p>
</body>
</html>

[makeitslow]

Como puedo hacer eso mismo en PHP?

[Shiryu_Libra]

podrias leer este texto mira

Calcular dias entre dos fechas en PHP

aunque si hubieras POSTEADO en el foro de PHP, te hubieran respondido mas rapido...

suerte

[makeitslow]

Bueno ya lo intente, pero aun ando varado con eso de calcular la edad automaticamente en una misma pagina ingresando solo la fecha.. pero parece que ya me ayudaron con Ajax... a ver como me va.. GRacias por tu respuesta!