Hallo Ingo,
ich habe folgendes script benutzt, um eMails weiterzuleiten.
Der Agent laüft "vor Eingang neuer Mail" und kopiert subject, body,from und principal in das neu zu erstellenden Dokument.
Vielleicht kann man das ja umbasteln.
Sub Initialize
Const sForward = "theo.testmann@irgendwo.de"
Dim session As New NotesSession
Dim note As NotesDocument
Dim docNew As NotesDocument
Dim db As NotesDatabase
Dim item As NotesItem
Set session = New NotesSession
Set db = session.CurrentDatabase
Set note = session.DocumentContext
Set item = note.GetFirstItem("Body")
Set docNew = New NotesDocument(db)
docNew.Form = "Memo"
Call item.CopyItemToDocument(docNew,"")
docNew.SendTo = sForward
docNew.From = " " & note.From(0)
docNew.Principal = " " & note.From(0)
docNew.Subject = note.Subject(0)
Call docNew.Send(True)
End Sub
HTH
Thomas