Les Snippets

Nouveaux snippets
Snippets les plus consultés
Proposer un snippet

 Abonnez vous à ce fil d'information Les rss

Rechercher :

Par langages :

Par Catégorie

Compteurs


Nombre de sujets : 572
Nombre de snippets : 1782
Connexion

nombre d'années(age)

Niveau requis pour utiliser/comprendre cette source : 1 ( Débutant )
Créé le 19/07/2008 14:59:54 et initié par gillardg [Liste]
Vue : 2096
Catégorie(s) : Date & Heure
Langages dispo pour ce code :
- VB 2005, VB 2008
- PHP 3, PHP 4, PHP 5
- VB6
Proposer ce code dans un autre langage



Langage : VB 2005 , VB 2008
Date ajout : 19/07/2008
Posté par gillardg [Liste]

Public Function Age(ByVal Birthdate As System.DateTime) As Long

Try
Dim CurrentDate As System.DateTime = System.DateTime.Today 
Select Case Month(Birthdate)
Case Is < Month(System.DateTime.Today) 
Age = DateDiff("YYYY", Birthdate, Now())
Case Is = Month(CurrentDate) 
Select Case (Birthdate.Day)
Case Is < (CurrentDate.Day) 
Age = DateDiff("YYYY", Birthdate, Now())
Case Is = (CurrentDate.Day) 
Age = DateDiff("YYYY", Birthdate, Now())
Case Is > (CurrentDate.Day) 
Age = DateDiff("YYYY", Birthdate, Now()) - 1
End Select

Case Is > Month(CurrentDate) 
Age = DateDiff("YYYY", Birthdate, Now()) - 1
Case Else


Age = 0

End Select
Catch ex As System.Exception 
'Error handling code does here

End Try

End Function
Langage : PHP 3 , PHP 4 , PHP 5
Date ajout : 23/07/2008
Posté par buno [Liste]
/**
    @brief Cette fonction calcule l'age d'une personne à partir de sa date de naissance
    @param $dd Jour de Naissance
    @param $mm Mois de Naissance
    @param $yy Annee de Nassance
*/
function GetAge($dd,$mm,$yy)
{
    $naiss = mktime(0, 0, 0, $mm, $dd, $yy);
    $today = mktime();
    $secondes = ($today > $naiss) ? $today - $naiss : $naiss - $today;
    $annees = date('Y', $secondes) - 1970;
    echo $annees;
}
Langage : VB6
Date ajout : 08/08/2008
Posté par Renfield [Liste]
 Private Function Age(ByRef vdBirthDate As Date, Optional ByVal vdNow As Date) As Long
     If vdNow = 0 Then
         vdNow = Now
     End If
     Age = Fix(DateDiff("D", vdBirthDate, vdNow) / 365.25)
 End Function

Snippets en rapport avec : Date, Age

19/07/2008 - nom de la saison d'une date

16/04/2008 - Récupérer le nom du fichier le plus récent

01/09/2007 - Contrôle si Date Invalide [CDI]

02/07/2007 - Récupérer le numéro du mois à partir de son nom

29/03/2007 - Obtenir le dernier jour de la semaine

16/11/2006 - Convertit en jours / heures / minutes le temps entre 2 dates & heures

30/10/2006 - Déterminer le jour de la semaine d'une date

12/10/2006 - Trouver le dernier week end pour un mois et une année donnés

21/07/2006 - Trouver le prochain jour ouvrable, à partir d'une date, et selon un delta en jours

19/05/2006 - Conversion de date au format DOS



Codes sources en rapport avec : Date, Age

{PHP} FONCTION QUI CALCULE L'AGE A PARTIR D'UNE DATE DE NAISSANCE
Cette fonction permet de savoir l'âge en fonction d'une date de naissance au format français jj/mm/a...

{PHP} FONCTION QUI RETOURNE L'AGE AVEC LE JOUR/MOIS/ANNÉE DE NAISSANCE
Ce code peut être utile pour retourner l'âge d'un membre sur votre site ou sur votre forum par exemp...

{ASP / ASP.NET} CALCUL DE L'AGE D'UNE PERSONNE (ASP VBSCRIPT)
Calcul de l'age d'une personne à partir de sa date de naissance donnée en paramettre en ASP VBScript...

{C / C++ / C++.NET} CALCUL AGE
Ce code calcul l'age en decomposant d'abord tout en jours. Je pense que le code gère bien les année...

{} DATE ANSI SQL
Valide le format de date ANSI SQL "YYYY-mm-dd hh:mi:ss am/pm" Permet l'utilisation de "/", "-", "...

{Visual Basic, VB6, VB.NET, VB 2005} DATE DES SAISONS
Voici, une petite source pour calculer les dates précises des saisons... Le code n'est pas de moi...

{Delphi} MODIFIER LES DATES DE CRÉATION, DE MODIFICATION ET DE DERNIER ACCÈS D'UN FICHIER
La Source de grandvizir actuellement présente sur le site (http://www.delphifr.com/codes/CORRUPTEUR-...

{Visual Basic, VB6, VB.NET, VB 2005} AGENDA TOUT SIMPLE ( NO DATABASE)
agenda tout simple qui utilise un fichier pour chaque jour en lieu et place d'une base de données ...

{JAVA / J2EE} CALENDRIER
J'ai fait un petit calendrier en utilisant un TableLayout. En voici les caractéritiques: - Chaque...

{PHP} CALCUL SIMPLE DU NOMBRE DE JOURS OUVRÉS ENTRE DEUX DATES (JOURS FÉRIÉS INTÉGRÉS)
Cette fonction permet de calculer le nombre de jours ouvrés entre deux dates, week-end et jours féri...