Bonjour,
Voila aujourd’hui j'ai un petit souci...
Mon programme doit ajouter du rich text en fin d'un fichier rtf. J'ai essayé plein de choses : streamwrite, ça
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
    Public Function AddText(ByVal path As String, ByVal text As RichTextBox)
        Dim n As New RichTextBox
        Dim f As New RichTextBox
        n.LoadFile(path)
        f.Rtf = n.Rtf + text.Rtf
        f.SaveFile(path)
        Return Nothing
    End Function
Ici c'est "f.Rtf = n.Rtf + text.Rtf" qui donne n.Rtf Oo
Sans résultat à cause de ce maudit RTF !!!

Si quelqu'un a une idée