Discussion :

[Pleymo]

Salut

Je ne sais pas pour quelles raisons mais j'écris dans un fichier par bloc..

mes 2 premiers bloc s'inscrive un à la suite de l'autre puis rendu au 3e bloc...il passe une ligne puis l'écris ensuite...

je ne veux absolument pas avoir de passage de ligne dans mon fichier...puisque je ne comprend pas la raison de ce probleme...

...je me demandais sil etais possible...avant de faire mon écriture...faire un trim pour enlever les espace à fin du mon fichier...

merci!

[Pleymo]

Salut

jai mis ce que jai lu dans une string pi jai fait string.trimEnd mais il continue décrire en passant une ligne...

voici mon code :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
'Être sur qu'il n'y a pas d'espace ("   ") à la fin du fichier schedule.jde
Dim StmrPasVide As StreamReader = New StreamReader(SchSrceFile, System.Text.Encoding.UTF8)
Dim LignePasVide As String
LignePasVide = StmrPasVide.ReadToEnd()
LignePasVide = LignePasVide.TrimEnd
StmrPasVide.Close()
Dim StmwPlein As StreamWriter = New StreamWriter(SchSrceFile, False, System.Text.Encoding.UTF8)
StmwPlein.WriteLine(LignePasVide)
StmwPlein.Close()

que faire?

merci!

[troxsa]

La question est comment faire pour lire ton fichier ligne par ligne !

et si la ligne est = "" alors je fait un truc ou pas !

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
10
11
12
 
    Dim LectureFichier As New StreamReader("Ton Fichier.Texte")
    Dim Maligne As String = LectureFichier.ReadLine
 
 Do While Not Maligne Is Nothing
    'Lecture de la ligne ...
 
--- ICI TON CODE IF Maligne = "" .....
 
     Maligne = LectureFichier.ReadLine
 Loop
LectureFichier.Close()

[Pleymo]

Salut

J'ai 2 problèmes avec ta solution :

Premier :

Le vrai problème c'est qu'il passe une ligne après quelques enregistrements et non au début. Après 2 bloc d'enregistrements tout va bien, au 3e il commence à passer des lignes entre chaque enregistrements. Dans ce cas-ci que faire?

Deuxième :

Il m'est impossible de lire mon fichier, d'écrire dedans puis tout marche à la merveille....car une erreur survient en me disant que mon fichier est en cours d'utilisation quand je viens pour écrire dedans. C'est donc pour cela que j'ai fait comme 2 post plus haut.


D'après mes tests, je crois que quand je met mon streamwriter à true -> (file,true,encoding)... je crois qu'à chaque fois qu'il écrit à la suite il passe une ligne à la fin par défaut...Peut-être que je me trompe...si oui...

...que dois-je faire à présent?

Merci

[Pleymo]

Salut

J'ai finalement réglé mon trouble...pour l'instant tout fonctionne après plusieurs tests...

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
Dim finligne As String
finligne = StreamRead.ReadToEnd()
If finligne.EndsWith(ControlChars.CrLf) Then
   finligne = finligne.TrimEnd()
End If

merci...