Hallo,
ich versuche die Newsletter Funktion anzuwenden. Habe mal das Beispiel aus der Hilfe genommen:
Sub Initialize
Dim session As New NotesSession
Dim db As NotesDatabase
Dim dc As NotesDocumentCollection
Dim news As NotesNewsletter
Dim doc As NotesDocument
Set db = session.CurrentDatabase
Call db.UpdateFTIndex(True)
Set dc = db.FTSearch("test", 2)
Set news = New NotesNewsletter(dc)
news.SubjectItemName = "Subject"
news.DoSubject = True
Set doc = news.FormatMsgWithDoclinks(db)
Call doc.Send(True, "Marketing")
End Sub
Ichhabe eine Mail mit dem Body "text" Also müsste er mind. 1 Dokument finden.
Nach Ausführen kommt die Meldung, "Spezielles Datenbankobjekt nicht gefunden. Verweis auf meine Maildb"
Was mach ich falsch?