Soyez le premier à donner votre avis sur cette source.
Snippet vu 11 242 fois - Téléchargée 30 fois
Public Function WriteText(Byval TextFileName as String, ByVal _Line As String) Dim File As New System.IO.FileStream(TextFileName, IO.FileMode.Append, IO.FileAccess.Write) Dim Record As New System.IO.StreamWriter(File) Record.WriteLine(_Line) Record.Flush() 'Record.Close() File.Flush() File.Close() End Function
Si vsText contient un saut de ligne également, tu te retrouves avec deux lignes sautées...
Merci Renfield, ton code marche très bien. Aurais-tu une idée pour supprimer les lignes vides qui s'intercalent de temps en temps? J'ai bien mis une fonction pour supprimer ces lignes, mais se n'est pas très conventionnel, si l'on pouvait le faire à l'écriture cela allégerait le code.
Merci.
Public Sub AppendText(ByVal vsFilePath As String, ByVal vsText As String)
With New System.IO.StreamWriter(vsFilePath, True)
.WriteLine(vsText)
.Close()
End With
End Sub
ça m'a l'air bien tout ça mais, as-tu un exemple pour ouvrir, puis modifier un fichier texte existant ?
je cherche à modifier la première ligne d'un fichier, puis l'enregistrer.
Idée ????
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.