Sujet Précédent Sujet Suivant

Transformer un script de date

scubegt Messages postés 2 Date d'inscription mardi 9 novembre 2004 Statut Membre Dernière intervention 9 novembre 2004 - 9 nov. 2004 à 01:09
scubegt Messages postés 2 Date d'inscription mardi 9 novembre 2004 Statut Membre Dernière intervention 9 novembre 2004 - 9 nov. 2004 à 21:36

voila j'ai script qui me permet quand j'apelle la variable "MyDateRes" d'iscrire dans un fichier la date de cette facon: DDMMYY mais je souhaiterais le modifier pour que la date soit inscrite de cette maniere: YYYYMMDD

Function Date_Creation_Search()
MyDateRes = ""
If ( DatePart("d",MyDate) < 10 ) Then
MyDateRes = "0" & DatePart("d",MyDate)
Else
MyDateRes = DatePart("d",MyDate)
End If
If ( DatePart("m",MyDate) < 10 ) Then
MyDateRes = MyDateRes & "0" & DatePart("m",MyDate)
Else
MyDateRes = MyDateRes & "0" & DatePart("m",MyDate)
End If
MyDateRes = MyDateRes & Right(DatePart("yyyy",MyDate),2)
End Function

A voir également:

3 réponses

Réponse 1 / 3

thierrydelepine Messages postés 521 Date d'inscription mardi 24 décembre 2002 Statut Membre Dernière intervention 11 septembre 2008 6
9 nov. 2004 à 09:31

MyNewDate = Format(MyDate, "YYYY MM DD")

Réponse 2 / 3

thierrydelepine Messages postés 521 Date d'inscription mardi 24 décembre 2002 Statut Membre Dernière intervention 11 septembre 2008 6
9 nov. 2004 à 09:32

ou pour toi peut etre

MyNewDate = DatePart("YYYY MM DD",MyDate)

Réponse 3 / 3

scubegt Messages postés 2 Date d'inscription mardi 9 novembre 2004 Statut Membre Dernière intervention 9 novembre 2004
9 nov. 2004 à 21:36

merci je vais essayer

Discussions similaires

[clos] script pour prendre des rendez sur mon site

besoin de désactiver/supprimer le captcha

TLSCONTACT

calcul d'un nombre de jours entre deux dates

Recuperer la date de demain