Das Notes Forum
Domino 9 und frühere Versionen => Administration & Userprobleme => Thema gestartet von: majoo am 11.10.02 - 17:37:50
-
Hallo,
ich würde gerne eine Liste aller Datensätze in meiner
Datenbank (oder aucg gefiltert), per Agent 1mal im Monat versenden.
Die grundsätzliche Anwendungsweise von @MailSend
ist mir klar.
Ich weiss nur nicht wie ich den Agent dazu bringe in
eine Mail alle Datensätze zu schreiben.
Für jeden Datensatz eine eigene Mail würde gehen, aber
ist nicht schön für den Empfänger.
Kann man vielleicht das Ergebnis einer Ansicht per Agent versenden?
Danke für Hilfe
majoo
-
Hallo,
nimm doch Lotus Script, damit geht es (recht) einfach:
Dim s As New NotesSession
Dim db As NotesDatabase
Dim v as NotesView
Dim doc As NotesDocument
Dim mail As NotesDocument
Dim rtitem As NotesRichtextItem
Set db = s.CurrentDatabase
Set v = db.GetView("DeineAnsicht")
Set doc = v.GetFirstDocument
if doc is nothing then exit sub
Set mail = db.CreateDocument
mail.form = "Memo"
mail.subject = "Was auch immer"
Set rtitem = New NotesRichTextItem( mail,"body")
do until doc is nothing
Call rtitem.appendtext("Telefon: " & doc.telefon(0))
Call rtitem.appendtext("E-Mail: " & doc.email(0))
Call rtitem.appendtext("Thema: " & doc.anfrage(0))
Call rtitem.addnewline(1)
Set doc = v.GetNextDocument(doc)
loop
Call mail.send(False,doc.email(0))
Das vorhergehende kleine Script loopt durch eine View und schreibt zu jedem Dokument eine Zeile. Zeilenumbrüche bekommt man via "addnewline(AnzahlDerUmbrüche)".
-
guck dir doch mal beim Agenten die "einfachen Funktionen" an.
Da ist so etwas wie ein Newsletter dabei, der dir Datensätze in einer Mail mit Doclinks versendet.
Die Möglichkeiten zur Konfiguration sollten ausreichen.
eknori