Hallo zusammen,
ich habe ein Dokument mit einem RTItem "body". Sobald der Inhalt eine gewisse Größe erreicht, habe ich auf einmal 2, 3 oder mehr. Soweit kein Problem, der Inhalt ist komplett in Script vorhanden nur bei der Range nicht.
| |
| Set rtitem1 = doc.GetFirstItem( "Body" ) |
| If Not rtitem1 Is Nothing Then |
| Call rtitem1.CopyItemToDocument( searchdoc, "Body" ) |
| Call searchdoc.Save( True, True ) |
| |
| Set rtitem2 = searchdoc.GetFirstItem("Body") |
| Set rtrange = rtitem2.CreateRange |
| Set style = session.CreateRichTextStyle |
| style.NotesFont = rtitem2.GetNotesFont("Default Sans Serif", True) |
| style.FontSize = 10 |
| Call rtrange.SetStyle(style) |
| Call searchdoc.Save( True, True ) |
| End If |
Ich muss den kompletten Text in Default Sans Serif, Größe 10 bekommen da sonst keine CSS greifen.
Kennt jemand eine Lösung.
Danke und Gruß
Alex