Lecture de fichier et date
Résolu
cs_pompomp
Messages postés
21
Date d'inscription
samedi 28 janvier 2006
Statut
Membre
Dernière intervention
21 août 2008
-
20 juil. 2008 à 16:14
cs_pompomp Messages postés 21 Date d'inscription samedi 28 janvier 2006 Statut Membre Dernière intervention 21 août 2008 - 20 juil. 2008 à 16:33
cs_pompomp Messages postés 21 Date d'inscription samedi 28 janvier 2006 Statut Membre Dernière intervention 21 août 2008 - 20 juil. 2008 à 16:33
A voir également:
- Lecture de fichier et date
- Fichier json - Conseils pratiques -Javascript
- Sql insert date ✓ - Forum SQL
- Vb.net format date - Forum Visual Basic
- Vba date to string - Forum Visual Basic
- Sql comparaison date - Forum SQL
2 réponses
Kevin.Ory
Messages postés
840
Date d'inscription
mercredi 22 octobre 2003
Statut
Membre
Dernière intervention
7 janvier 2009
11
20 juil. 2008 à 16:25
20 juil. 2008 à 16:25
Salut,
1. C'est parce que tu fais 2 ReadLine à la suite. 'If Lire.ReadLine.Substring(0, 10)' lira la 1ère ligne, mais '
ListHistorique.Items.Add(Lire.ReadLine)' lira la 2ème. Donc il suffit de faire comme ça:
Lire = New StreamReader(FichierHistorique)
Do Until Lire.EndOfStream
Dim Line as String = Lire.ReadLine
If Line.Substring(0, 10) = CDate (Format( Date .Today, "dd/MM/yyyy" )) Then
ListHistorique.Items.Add(Line)
End If
Loop
Lire.Close()
Il suffit de faire une exécution pas à pas pour voir le problème.
2. Dim hier As Date = Date.Today.Subtract(New TimeSpan(1, 0, 0, 0))
1. C'est parce que tu fais 2 ReadLine à la suite. 'If Lire.ReadLine.Substring(0, 10)' lira la 1ère ligne, mais '
ListHistorique.Items.Add(Lire.ReadLine)' lira la 2ème. Donc il suffit de faire comme ça:
Lire = New StreamReader(FichierHistorique)
Do Until Lire.EndOfStream
Dim Line as String = Lire.ReadLine
If Line.Substring(0, 10) = CDate (Format( Date .Today, "dd/MM/yyyy" )) Then
ListHistorique.Items.Add(Line)
End If
Loop
Lire.Close()
Il suffit de faire une exécution pas à pas pour voir le problème.
2. Dim hier As Date = Date.Today.Subtract(New TimeSpan(1, 0, 0, 0))
cs_pompomp
Messages postés
21
Date d'inscription
samedi 28 janvier 2006
Statut
Membre
Dernière intervention
21 août 2008
20 juil. 2008 à 16:33
20 juil. 2008 à 16:33
Réponse acceptée avec plaisir!
J'avais bien vu que le problème venait du 1er readline mais je n'avais pas trouvé comment y remédier
Merci bien Kevin.Ory, ça marche impec !
J'avais bien vu que le problème venait du 1er readline mais je n'avais pas trouvé comment y remédier
Merci bien Kevin.Ory, ça marche impec !
