cs_baz187rem
Messages postés78Date d'inscriptionvendredi 23 mars 2007StatutMembreDernière intervention21 juin 2010
-
10 mai 2010 à 12:33
cs_baz187rem
Messages postés78Date d'inscriptionvendredi 23 mars 2007StatutMembreDernière intervention21 juin 2010
-
10 mai 2010 à 13:45
Bonjour à toutes et tous,
J'ai un petit soucis avec le streamreader, il saute des lignes dans mon fichier texte.
Le streamWriter écrit bien mais du coup je suis obligé d'insérer des saut de lignes dans mon fichier texte pour lire toutes mes données.
Dim file As String
Dim refassemblies As String
FileDialog.ShowDialog()
file = FileDialog.FileName
grdReferencesAssemblies.Rows.RemoveRange(grdReferencesAssemblies.Rows.Fixed, _
grdReferencesAssemblies.Rows.Count - 1)
Dim oFile As New StreamReader(file)
Do
refassemblies = oFile.ReadLine()
grdReferencesAssemblies.Rows.Add()
grdReferencesAssemblies.Item(grdReferencesAssemblies.Rows.Count - 1, 0) = refassemblies
Loop Until oFile.ReadLine Is Nothing
oFile.Close()
Renfield
Messages postés17287Date d'inscriptionmercredi 2 janvier 2002StatutModérateurDernière intervention27 septembre 202175 10 mai 2010 à 12:51
il ne 'saute' pas des lignes, c'est TOI qui les lit ^^
une ici :
refassemblies = oFile.ReadLine()
et une ici:
Loop Until oFile.ReadLine Is Nothing
faire en gros:
Do
refassemblies = oFile.ReadLine()
If refassemblies Is Nothing Then
Exit Do
End If
grdReferencesAssemblies.Rows.Add()
grdReferencesAssemblies.Item(grdReferencesAssemblies.Rows.Count - 1, 0) = refassemblies
Loop