Extraire date dans nom de fichier txt

[Résolu]
Signaler
Messages postés
1
Date d'inscription
jeudi 28 avril 2005
Statut
Membre
Dernière intervention
2 juin 2005
-
Messages postés
745
Date d'inscription
mardi 30 novembre 2004
Statut
Membre
Dernière intervention
15 septembre 2009
-
Bonjour, j'ai un fichier style 05_05_16.txt dont le format est le suivant "yy_mm_dd.txt", je veux extraire la date et la mettre dans un variable date avec un format "dd/mm/yy".
Est-ce possible?
Merci !

~>Rom1

3 réponses

Messages postés
10
Date d'inscription
mercredi 26 mars 2003
Statut
Membre
Dernière intervention
3 juin 2005

sub main()

dim nomFichier as string
dim maDate as string

'ici il faudra donc mettre le nom du ficheir dans nomFichier.
'La ligne suivante n'est qu'un exemple
nomFichier = "05_05_16.txt"

maDate = mid(nomFichier,7,2) & "/" & mid(nomFichier,4,2) & "/" & left(nomFichier,2)

end sub
3
Merci

Quelques mots de remerciements seront grandement appréciés. Ajouter un commentaire

Codes Sources 70 internautes nous ont dit merci ce mois-ci

Messages postés
745
Date d'inscription
mardi 30 novembre 2004
Statut
Membre
Dernière intervention
15 septembre 2009
4
Salut,

tu extraits la partie "date" de ta chaîne :

dim s as string
dim d as DateTime

s = "05_05_16.txt"
s = s.remove(s.indexOf(".", s.length())

d = DateTime.Parse(s)

@+
Messages postés
745
Date d'inscription
mardi 30 novembre 2004
Statut
Membre
Dernière intervention
15 septembre 2009
4
Désolé, j'avais pas vu que tu cherchais une réponse en vb...
@+