Format de Date

Question

Bonjour.
J ai un peti pb pour un petit programme ou je dois renommer une disquette en incorporant la date dans le nom renommer... cela ne pose pas de probleme...
La ou il y en a un pb, c est que lon me demande de mettre cette date en forme abregé (ex:10-02-03) et que les noms de fichier naccepte pas les / et \ il n est donc pas possible d utiliser le vbShortDate(car / ou \) ni le vbLongDate(puisqu on le veut en abregé).
Alors comment faire??? La je bloc vraiment?
Merci pour l aide

Vbsupernul · Answer

ben pour afficher la date

date=Format(Date, "dd-mm-yy")  (çe qui donnera par example 01-01-01 pour le premier janvier 2001)

pour le nom complet, c'est 4 fois la lettre (au cas où tu en aurais besoin + tard  ;) 

@+
Vbsupernul (à force de poster des sos, je vais finir par devenir moins nul  :clown) )

cs_popeye59 · Answer

Merci bien, moi je viens de trouvé une autre solution a mon pb, voicicomment j ai fais:

    ladate = FormatDateTime(Date, vbShortDate)
    jour = Mid(ladate, 1, 2)
    moisAnnee = Mid(ladate, 4)
    mois = Mid(moisAnnee, 1, 2)
    annee = Mid(ladate, 7)
    dateRaccourci = annee & "-" & mois & "-" & jour

Ca marche mais ca prend un peu plus de memoire donc je prends ta solution.Merci bien

Vbsupernul · Answer

erf, en gros tu pouvais carrément faire
jour= day(date)
mois= month(date)
annee= year(date)
ladate= day & "-" & month & "-" & annee

lol  :) 

@+
Vbsupernul (à force de poster des sos, je vais finir par devenir moins nul  :clown) )

Format de Date

3 réponses

Discussions similaires