Cpt Anderson
Membre éclairé

Voici la méthode de mon chef:

copy (DateTimeToStr(Now),7,4)+
copy (DateTimeToStr(Now),4,2)+copy (DateTimeToStr(Now),1,2)+copy (DateTimeToStr(Now),12,2)+
copy (DateTimeToStr(Now),15,2)+copy (DateTimeToStr(Now),18,2)

Je lui ai dit que FormatDateTime irait surement mieux