Hallo,
mal wieder ein Problem im Lotus Script: Ich habe einen Agenten in einer Projekt-Datenbank, der täglich laufen soll und Mahnungen verschickt, wenn Termine überschritten sind.
Der Agent läuft manuell angestossen wunderbar und versendet die Mails. Auf dem Server - mit einem Zeitplan versehen werden dagegen keine Mails verschickt, obwohl das Agent-Protokoll den Lauf bestätigt und keine Fehler meldet.
Hat jemand eine Ahnung ob und wie der manuelle Lauf und der server-basierte Lauf sich hier unterscheiden ?
Unten einen Auszug aus dem Code:
Sub sendMahnung1(doc As Notesdocument)
Dim session As New notessession
Dim db As notesdatabase
Dim docmail As notesdocument
Dim coll As Notesdocumentcollection
Dim body As NotesRichTextItem
Dim richStyle As NotesRichTextStyle
Set richStyle = session.CreateRichTextStyle
Set db = session.currentdatabase
'
Set docMail=db.createdocument
docMail.from=session.username
docMail.form="Memo"
If doc.getfirstitem("ProjektleiterEMail") Is Nothing Or doc.ProjektleiterEMail(0)="" Then
docmail.sendto=doc.Projektleiter(0)
Else
docMail.sendto=doc.ProjektleitereMail(0)
End If
docMail.subject="Projekte-DB: Terminhinweis zu Projekt " + doc.Projekt(0)
Set body=docMail.createRichTextItem("Body")
Call body.addnewline(2)
richstyle.bold=True
Call body.AppendStyle(richStyle)
vText="T E R M I N H I N W E I S"
Call body.appendtext(vText)
... blablabla
Call body.appendtext("(Diese Mail wurde automatisch erstellt.)")
On Error Resume Next
Call docMail.send(False)
End Sub