Formattage d'une date...

lolo1683 Messages postés 20 Date d'inscription lundi 16 décembre 2002 Statut Membre Dernière intervention 24 février 2005 - 7 févr. 2003 à 11:38
lolo1683 Messages postés 20 Date d'inscription lundi 16 décembre 2002 Statut Membre Dernière intervention 24 février 2005 - 7 févr. 2003 à 14:08
Hello,
Je me retrouve avec une chaine de carateres representant la date au format windows...(N'importe quel format windows)

Savez vous comment faire pour que je puisse la mettre à tout les coups au format "YYYYMMDD HH:MM:SS"

Please help me !!

3 réponses

cs_marcelin Messages postés 181 Date d'inscription lundi 3 février 2003 Statut Membre Dernière intervention 22 décembre 2016
7 févr. 2003 à 12:12
crée un module de découpage de "string" et replace le dans l'ordre que tu veux.

comme par exemple celui ci : il est pas adapter à ta demande mais tu modifier ce que tu veux
:
"
Function ManipDate(ByRef datedep) As String
'var
Dim jj As String
Dim mm As String
Dim aa As String

jj = Mid(datedep, 1, 2)
mm = Mid(datedep, 4, 2)
aa = Mid(datedep, 7, 2)

ManipDate = mm & "/" & jj & "/" & aa
End Function
"

si tu capte ked... demande

a+

marcelin
0
cs_rene38 Messages postés 1858 Date d'inscription samedi 29 juin 2002 Statut Membre Dernière intervention 17 octobre 2013 11
7 févr. 2003 à 13:21
Bonjour

TaDate = Format(CDate("DateAuFormatWin"), "YYYYMMDD HH:MM:SS")
0
lolo1683 Messages postés 20 Date d'inscription lundi 16 décembre 2002 Statut Membre Dernière intervention 24 février 2005
7 févr. 2003 à 14:08
Merci beaucoup, mais il faudrait que je connaisse le format de date windows pour savoir comment faire le decoupage...

Merci quand même !!!

8-)
0
Rejoignez-nous