Richtextbox Inhalt html konform formatieren VB.NET

[Gateway_man]

hi leute,

hab momentan ein Problem welches sich wie folgt erläutern lässt:

Ich habe für den Inhalt einer E-mail eine Richtextbox. Nun ist das Problem das, das das kein provider vbcrlf erkennt und folglich die ganzen Absätze ignoriert. Dies wollte ich folgendermaßen bereinigen:

dim bodystr as string

bodystr = Richtextbox1.text

bodystr.replace (vbclrf, "<br/>")

....

....

....

Dies habe ich dann getestet und es hat nicht funktionert. Ich dachte mir das das Problem daran lag, das ja vbcrlf nicht wirklich direkt im string steht und hab dann das char für die anführungszeichen bei <br/> angefügt und dieses zusätzlich nochmal mit anführungsstrichen zu versehen. Hat nicht geklappt. Wenn ich einen festen string welcher <br/> beinhaltet als body eintrage funktioniert das wunderbar.

Desweiteren will ich das <br/> nicht direkt bei dem event key (enter) einfügen, da das nicht schön aussieht und da er mir mit dem cursor dann direkt an den anfang der besagten textbox springt und mir der Aufwand diesen wieder an die neue Zeile zu stellen, ehrlich gesagt zu groß ist.

Sprich ich will es nach der Texteingabe in einem externen string bearbeiten.

Mir wäre eigentlich schon geholfen wenn mir jemand sagt, wie ich es schaffe die anzahl der momentane lines meiner Richtextbox1 zu ermitteln. Jedoch enthällt diese Klasse leider kein Count .

Mfg

Gateway

[HJST1979]

Hallo,

Anzahl der Zeilen:

Me.RichTextBox1.Lines.Length

Siehe auch http://www.codeproject.com/KB/vb/RTFToHTML.aspx

Gruß Hans-Jörg

[0815FIA]

bodystr.replace (System.Environment.NewLine, "<br/>")

[Gateway_man]

sry das ich mich erst so spät melde, hat leider nicht funktioniert, hab mir den string dann ausgeben lassen und die Zeichen wurden nicht eingefügt.

mfg

Gateway

[Gateway_man]

Sry bearbeitungszeit war leider schon verstrichen. Habs jetzt sowei wie ich es wollte, nur leider ist es nochnicht wirklich allzu elegant gelöst:

    For i As Integer = 0 To RichTextBox1.Lines.Length - 1

            str = str & RichTextBox1.Lines(i).ToString & "<br/>"

        Next

Mfg

Gateway

[0815FIA]

Ups, du hast recht

bodystr = bodystr.replace("\n", "<br/>")