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)".