Extraire date dans nom de fichier txt [Résolu]

DTRom1 1 Messages postés jeudi 28 avril 2005Date d'inscription 2 juin 2005 Dernière intervention - 2 juin 2005 à 16:19 - Dernière réponse : cs_drahcir 745 Messages postés mardi 30 novembre 2004Date d'inscription 15 septembre 2009 Dernière intervention
- 2 juin 2005 à 19:24
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
Afficher la suite 

3 réponses

Meilleure réponse
juju740 10 Messages postés mercredi 26 mars 2003Date d'inscription 3 juin 2005 Dernière intervention - 2 juin 2005 à 16:51
3
Merci
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

Merci juju740 3

Avec quelques mots c'est encore mieux Ajouter un commentaire

Codes Sources a aidé 69 internautes ce mois-ci

cs_drahcir 745 Messages postés mardi 30 novembre 2004Date d'inscription 15 septembre 2009 Dernière intervention - 2 juin 2005 à 16:51
0
Merci
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)

@+
cs_drahcir 745 Messages postés mardi 30 novembre 2004Date d'inscription 15 septembre 2009 Dernière intervention - 2 juin 2005 à 19:24
0
Merci
Désolé, j'avais pas vu que tu cherchais une réponse en vb...
@+

Vous n'êtes pas encore membre ?

inscrivez-vous, c'est gratuit et ça prend moins d'une minute !

Les membres obtiennent plus de réponses que les utilisateurs anonymes.

Le fait d'être membre vous permet d'avoir un suivi détaillé de vos demandes et codes sources.

Le fait d'être membre vous permet d'avoir des options supplémentaires.