Aufruf eines neuen Memos und gleichzeitiger Eintrag einer eMail-Adresse

  • Hallo zusammen,


    ich versuche aus einer Datenbank mit Adressen nicht nur ein neues Memo zu erstellen, sondern auch gleich die gespeicherte eMail-Adresse im Feld "An" einzutragen. Weiterhin möchte ich auch gleich einen Betreff vorgeben.


    Bis auf den Aufruf des Memos mit


    @Command([MailComposeMemo])


    bekomme ich es aber nicht geregelt. Die Datenbank ist kein "Adressbuch".


    Für Eure Unterstützung wäre ich dankbar.


    Viele Grüße und ein schönes Wochenende

    :-? fuchs1959 :idea:


    Der kürzeste Weg zwischen zwei Menschen ist ein Lächeln! (Sokal)...

  • probieren diesen Code
    @Command([MailComposeMemo]);
    @SetField("SendTo"; "user@mail.com");
    @SetField("Subject"; "TEXT FUER BETREFF ZEILE");
    @Command([ViewRefreshFields]);


    Das sollte eigentlich funktionieren.


    Maile mir wenn Du weitere Fragen haben solltest: alex428uk@hotmail.com


    Alex

  • Hier eine Lösung, die bei mir per Schaltflächenfunktion eingesetzt wird. Lotus Script. Es muss nur noch die Mailaddy angegeben werden. :)


    Sub Click(Source As Button)
    Dim ws As New NotesUIWorkspace
    Dim session As New NotesSession
    Dim db As NotesDatabase
    Dim doc As NotesDocument
    'Dim uidoc As NotesUIDocument
    'Dim eigener As String
    'Dim server As String
    'Set uidoc = ws.CurrentDocument
    eigener = session.GetEnvironmentString ("MailFile", True)
    server = session.GetEnvironmentString ("MailServer", True)
    Set db = New Notesdatabase (server, eigener)
    Set doc = db.createDocument
    doc.Form = "Memo"
    doc.Subject = "Hier kannst Du dein Betreff eingeben...Feedback"
    doc.SendTo = "einemail@webb.de"
    Call ws.EditDocument (True, doc)
    End Sub