Beiträge von basti79

  • rendertortitem funzt nicht richtig; Anhänge ja, Text nein

    Vielen Dank für die schnelle Antwort...



    Ich habe die Memo-Maske aus der MailDB kopiert. Sie ist also vorhanden. Es macht keinen Unterschied, ob ich [mail.form = "Memo"] oder es nicht hinschreibe.
    Muss ich der DB noch irgendwie mitteilen, dass die Maske da ist? Findet er sie vielleicht nicht? Wenn ich mir die Mails quasi per Copy and Paste reinkopiere (als Test) öffnet er diese zwar mit tausend mal der gleichen Fehlermeldung (liegt wahrscheinlich an irgendwelchen Verknüpfungen der Maske, die nicht da sind), aber er öffnet sie mit der Maske...

  • rendertortitem funzt nicht richtig; Anhänge ja, Text nein

    Hallo an alle!


    Notes R5


    Vielleicht könnt Ihr mir ja helfen! Es wäre super irre, weil ich langsam verzweifle.


    Mein Problem ist folgendes:


    Ich versuche mit rendertortitem in einer von mir entworfenen Maske eine Mail (ne andere Maske) ins Dokument einzufügen.
    Rendertortitem läuft scheinbar sauber durch. Die Anhänge werde auch dargestellt. Nur leider fehlt der Text komplett. Nix steht da.


    Hier mein Code:


    Sub Click(Source as Button)


    Dim ws as notesuiworkspace
    dim note as NotesDocument
    Dim db as New NotesDatabase("", "")
    Dim mail as NotesDocument
    Dim ndc as NotesDocumentCollection
    Dim rtitem as NotesRichTextItem
    Dim success as Variant


    Call db.open("", "meinMail.nsf")
    set ndc = ws.PickListCollection(PICKLIST_CUSTOM, False, ... ... .)
    'abgekürzt, weil es funzt


    set mail = ndc.getfirstdocument
    set note = ws.CurrentDocument.Document
    set rtitem = new NotesRichTextItem(note, "Body")


    mail.form = "Memo"
    'Ist egal, ob es da steht oder nicht (Memo habe ich aus der MailDB kopiert)
    success = mail.rendertortitem(rtitem)
    'Success ist true
    Call note.save(true, true)
    ws.currentdocument.reload


    End Sub



    Konkret: Warum wird der Text der Mail nicht angezeigt?


    Vielen Dank für Eure Mühe.


    Gruß