Hallo!
Ich habe folgendes Problem mit dem Versenden vom Emails, die einen DocLink enthalten sollen:
Anstatt des Links erhalte ich einen eingeklammerten Text, der sieht dann so aus:
Dies ist der Mail-Inhalt...(Document link: zum Dokument)
Der Code der das fabriziert ist folgender:
Code
Sub Postsave(Source As Notesuidocument)
Dim ws As New NotesUIWorkspace
Dim db As NotesDatabase
Set db = ws.CurrentDatabase.Database
Dim maildoc As New NotesDocument( db )
Dim mailbody As New notesrichtextitem( maildoc,"Body" )
Call mailbody.AppendText( "Dies ist der Mail-Inhalt..." )
Call mailbody.AppendDocLink( Source.Document, "hier geht's zum Dokument" )
maildoc.Form = "Memo"
maildoc.Subject = "Test-Email"
Call maildoc.Send( False, Source.FieldGetText( "mitarbeiter" ) )
End Sub
Alles anzeigen
Was habe ich falsch gemacht? :-?
Wer kann mir helfen?
Grüße
George