Guten Morgen,
ich habe in einer neuentwickelten Anwendung ein Problem mit dem erstellen einer Mail per LotusScript.
In einem bestehenden Dokument (Benutzer ist im Autorenfeld enthalten und hat Autorenrechte auf die Anwendung) wird über eine Aktion folgender code Aufgerufen:
Dim ws As New NotesUIWorkspace
Dim uidoc As NotesUIDocument
Dim se As New NotesSession
Dim db As NotesDatabase
Dim doc As NotesDocument
Set db = se.CurrentDatabase
Set uidoc = ws.CurrentDocument
Set doc = uidoc.Document
If uidoc.EditMode = False Then
uidoc.EditMode = True
End If
Call uidoc.Close
doc.Status = "9"
Call doc.Save(True,True)
ID = doc.UniversalID
Delete doc
Set doc = db.GetDocumentByUNID(ID)
Call ws.EditDocument(False,doc)
Dim pdoc As NotesDocument
Set Pdoc = db.GetProfileDocument("Konfig","Konfig")
If Pdoc.KonPBEmpfängerStorno(0) <> "" Then
Set mail = New NotesDocument(db)
mail.form = "memo"
mail.SendTo = Pdoc.KonPBEmpfängerStorno
mail.subject = "Text für Betreff"
Set rtitem = mail.CreateRichTextItem("Body")
Call rtitem.appendtext("Mailtext")
Call rtitem.AppendDocLink(doc,"Link zum Dokument","Anklickbarer Text")
Call mail.Send(False)
End If
Wird dieser Button von einem Editor oder höher verwendent funktioniert alles wunderbar.
Wird der Button von einem Autor betätigt, wird der Status umgesetzt, jedoch erscheint beim ausführen der Codezeile
Call rtitem.AppendDocLink(doc,"Link zum Dokument","Anklickbarer Text")
die Meldung "Notes Fehler: Sie sind zur Druchführung dieser Aktion nicht berechtigt"
Warum kann man als Autor keinen Link in die Mil hängen?