Domino 9 und frühere Versionen > ND8: Entwicklung

HTML in ein RT-Feld rendern

<< < (2/2)

pram:
Du kannst das HTML in ein MIME-Entity schreiben und somit auch von Notes wieder in ein RT-Item konvertieren lassen.

Es ist aber nicht ganz so einfach, da diese MIME-Dinger relativ komplex sind. (Hab hierzu schon einige Beiträge gepostet, so dass ich mir eine genauere Erklärung vorerst spare)

Gruß
Roland

samWare:
Hoffentlich nur vorerst. Wenigstens ein ansatz, bin mal gespannt ob ich das realisieren kann. Danke dir!

pram:
Diesen Beitrag hab ich gemeint:
http://atnotes.de/index.php/topic,43563.0.html
Da sollte alles wichtige drin stehen. Bei weiteren Fragen einfach hier posten.

samWare:
Danke dir Roland, ich hab das gestern dann innerhalb von 10 Minuten hinbekommen. Danke nochmal für den MIME Tipp! PS: War eig. überhauptkein Act. Was meinst du mit Komplex?  :-:

Mein Testcode (der Funkt) sieht so aus:


--- Code: ---Sub Click(Source As Button)
Dim session As New NotesSession
Dim ws As New NotesUIWorkspace
Dim db As NotesDatabase
Set db = session.CurrentDatabase
Dim uidoc As NotesUIDocument
Dim doc As NotesDocument

session.ConvertMime = False 'noch nicht in RT Rendern

Dim Docname As String
Docname =  Cstr(Inputbox("Geben Sie die den Namen des Documents ein"))

Set doc = New NotesDocument(db)
doc.Form = "frmHTML_to_RTItem"
doc.Docname = Docname

Dim stream As NotesStream
Set stream = session.CreateStream
Call stream.WriteText(Cstr(Inputbox("Geben Sie den zu Rendernden HTML Code ein")))

Dim mime As NotesMimeEntity
Set mime = doc.CreateMIMEEntity
Call mime.SetContentFromText(stream, "text/html", 1728)

Call doc.Save(True, True)
session.ConvertMime = True

Messagebox("HTML erfolgreich gerendert")
End Sub
--- Ende Code ---

Funktioniert wunderbar :)  :-*

pram:
hmm, schaut wirklich einfach aus.   ;D Was ich aber auf den ersten Blick vermisse ist ein CloseMimeEntities vor dem Save (Mir ist da immer wieder mal der Client abgestürzt)

Kompliziert wird es dann, wenn du Bilder mit einbinden willst oder dieses Feld später in einer Maske bearbeiten willst (wobei letzteres evtl sogar so geht wie du es gemacht hast)

Gruß
Roland

Navigation

[0] Themen-Index

[*] Vorherige Sete