Exemples de fonctions de date et d'heure pour le développement de sites Web ASP

Exemples de fonctions de date et d'heure pour le développement de sites Web ASP

Exemple de description de la syntaxe de fonction

Now Now() Obtient la date et l'heure actuelles du système Dim MyVar MyVar = Now

'' MyVar contient la date et l'heure actuelles.

Date Date() Obtient la date actuelle du système Dim MyDate MyDate = Date

'' MyDate contient la date système actuelle.

Time Time() obtient l'heure actuelle du système Dim MyTime MyTime = Time

'' Renvoie l'heure actuelle du système.

Year Year(Date) Obtient l'année de la date donnée Dim MyDate, MyYear

MaDate = #19 octobre 1962#

Exemple de description de la syntaxe de fonction

Now Now() Obtient la date et l'heure actuelles du système Dim MyVar MyVar = Now

'' MyVar contient la date et l'heure actuelles.

Date Date() Obtient la date actuelle du système Dim MyDate MyDate = Date

'' MyDate contient la date système actuelle.

Time Time() obtient l'heure actuelle du système Dim MyTime MyTime = Time

'' Renvoie l'heure actuelle du système.

Year Year(Date) Obtient l'année de la date donnée Dim MyDate, MyYear

MaDate = #19 octobre 1962#

''Attribuez une date.

MonAnnée = Année(MaDate)

'' MonAnnée contient 1962.

Mois Mois(Date) Obtient le mois de la date donnée Dim MyVar MyVar = Month(Now)

'' MyVar contient le numéro correspondant au mois en cours.

Day Day(Date) Obtenez la date de la date donnée Dim MyDay MyDay = Day(19 octobre 1962)

''MyDay en contient 19.

Hour Hour(time) Obtient l'heure de l'heure donnée Dim MyTime, MyHour

MyTime = Maintenant MyHour = Heure (MyTime)

'' MyHour contient une valeur numérique représentant l'heure actuelle.

Minute Minute(time) Obtient la minute Dim MyVar de l'heure donnée

MaVar = Minute (Maintenant)

Second Second(time) Obtenez le nombre de secondes du temps donné Dim MySec

MaSec = Seconde (Maintenant)

''MySec contient un nombre représentant la seconde en cours.

WeekDay WeekDay(Date) Obtient l'entier du jour de la semaine pour la date donnée, 1 signifie dimanche, 2 signifie lundi, et ainsi de suite Dim MyDate, MyWeekDay

MaDate = #19 octobre 1962#

'' Date d'affectation

MonJourSemaine = Jour de la semaine(MaDate)

'' MyWeekDay en contient 6, MyDate représente vendredi

DateDiffDateDiff(Var,Var1,Var2)

Var : facteur de date ou d'intervalle de temps, avec les paramètres suivants :

aaaa année m mois j jour ww semaine h heure s seconde Var1 : la première date ou heure

Var2 : La deuxième date ou heure, postérieure à Var1, calcule l'intervalle entre deux dates ou heures DateDiff(d,Date(),#1/1/2005#)

''Renvoyer combien de jours il reste avant le jour de l'An 2005

DateDiff(h,Date(),#1/1/2005#)

''Renvoyer combien d'heures il reste jusqu'au jour de l'an 2005

DateDiff(d,#1/1/2003#,#1/1/2005#)

''Renvoie le nombre de jours entre deux dates

DateAjouterDateDiff(Var,Var1,Var2)

Var : facteur de date ou d'intervalle de temps :

Var1 : date ou intervalle de temps multiple

Var2 : base de date ou d'heure. Ajoutez deux dates ou heures. L'exemple suivant ajoute un mois au 31 janvier 1995 :

NewDate = DateAdd(m, 1, 31-Jan-95)

Dans cet exemple, DateAdd renvoie le 28 février 1995 et non le 31 février 1995. Si la date est le 31 janvier 1996, la date du 29 février 1996 est renvoyée car 1996 est une année bissextile.

Si la date calculée est antérieure à 100 après JC, une erreur se produira.

FormatDateTime FormatDateTime(Date,vbShortDate) Convertir au format de date court FromatDateTime(Date(),vbLongDate)

Affichage au format date longue

FormatDateTime(Date,vbLongDate) Convertir au format de date longue

FormatDateTime(Date,vbShortTime) Convertir au format d'heure courte

FormatDateTime(Date,vbLongTime) Convertir au format d'heure longue