Discussion :

[loacast]

Bonjour,

Je souhaiterais convertir une date jj/mm/aaaa en mm/jj/aaaa et inversement. Malgrès mes recherches surtout sur l'aide de VB, je n'ai rien trouvé de concret sur cela.

Je vous remercie pour votre aide

[Megaxel]

Hello!
Regarde l'aide de la fonction Format( ), tu y trouveras peut-être ce que tu cherches.

[cari]

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

MyStr = Format(MyDate, "mm dd yyyy")

tu peux mettre les "/" ou pas.
pour jj mm aaaa

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

MyStr = Format(MyDate, "dd / mm / yyyy")

ou
pour mm jj aaaa

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

MyStr = Format(MyDate, "mm /dd  / yyyy")

ou

[loacast]

MsgBox Format(#1/1/2005#, "Date, abrégé")

Avant de chercher comment inverser les jours et les mois, j'ai tenté d'utiliser cette fonction pour une utilisation normale, et ça ne marche pas. Donc je fais encore appel à ton aide et merci.

EDIT :

Finalement j'ai trouvé comment utiliser Format dans mon cas :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
Dim MyTime
    Dim MyStr
    MyTime = #10/12/2004#
 
    MyStr = Format(MyTime, "mm/dd/yyyy")
    MsgBox MyStr
    MyStr = Format(MyTime, "dd/mm/yyyy")
    MsgBox MyStr

[Megaxel]

Comment ça, ça ne marche pas? Tu as une erreur?
Donne-nous le code actuel, et ce que ça te donne, et ce que tu veux obtenir, on y verra plus clair.

[edit]
Ok, j'ai rien dit...
[/edit]

[loacast]

A mince, j'avais pas vu que cari avait répondu bin alors merci cari, la prochaine fois je regarderais mieux ça m'évitera de chercher inutilement.

[ar_men]

la gestion des dates ... quelle belle histoire
ne parlons pas du passage à l'an 2000 ...

m'étant largement planté ... ben oui
un jour j'ai décidé de stocker les date en mode texte, c idiot je sais sous la forme aaaammjj

bon j'ai sué grave à écrire 2 ou 3 procédures de qq lignes

savez-vous que mes logiciels fonctionnent depuis plus de 20 ans sans pb de date en passant du gwbasic à VB ...