Extraire une date

Signaler
Messages postés
1
Date d'inscription
mardi 8 mai 2007
Statut
Membre
Dernière intervention
16 février 2008
-
Messages postés
4822
Date d'inscription
lundi 11 novembre 2002
Statut
Membre
Dernière intervention
15 novembre 2016
-
Bonjour,

J'ai une chaîne : "Tarifs en ? HT - 24 Janvier 2008"
Je cherche un moyen d'en extraire la date et la retranscrire sous la forme "24-01-2008"

Quelqu'un a-t-il une solution ?

5 réponses

Messages postés
4822
Date d'inscription
lundi 11 novembre 2002
Statut
Membre
Dernière intervention
15 novembre 2016
12
Salut,

Si le format de ta chaine reste identique, essaye ce bout de code en VB6, facilement transposable en .net :

Private Sub Command1_Click()


Dim dDate As Date
Dim sString As String
Dim iPos As Integer
Dim sStringReturn As String


sString = "Tarifs en ? HT - 24 Janvier 2008"
iPos = InStr(1, sString, "-")
sStringReturn = Mid(sString, iPos + 2)
dDate = CDate(sStringReturn)
MsgBox dDate


End Sub


A+
Exploreur

 Linux a un noyau, Windows un pépin
Messages postés
17286
Date d'inscription
mercredi 2 janvier 2002
Statut
Modérateur
Dernière intervention
23 décembre 2019
67
comment ce fait il que tu aies "perdu le contact" avec ta donnée,
et que tu doivent l'extraire ainsi salement ?
Messages postés
4822
Date d'inscription
lundi 11 novembre 2002
Statut
Membre
Dernière intervention
15 novembre 2016
12
Salut,

Bah...j'suis pas toujours dans les "ordres" Renfield(salut)...

A+
Exploreur

 Linux a un noyau, Windows un pépin
Messages postés
17286
Date d'inscription
mercredi 2 janvier 2002
Statut
Modérateur
Dernière intervention
23 décembre 2019
67
oula, pas d'inquiétude, Exploreur, je parlais a Roromix...

pas 36 solutions pour la mise en oeuvre...
mais a moins qu'il ne s'agisse d'exploiter des données extérieures, faut éviter ce genre de magouilles avec les données... c'est vraiment trop fluctuant.
Messages postés
4822
Date d'inscription
lundi 11 novembre 2002
Statut
Membre
Dernière intervention
15 novembre 2016
12
A+
Exploreur

 Linux a un noyau, Windows un pépin