There is a forwarding agent at tech note at 116204 that looks like this:
Sub Initialize()
Dim s As New NotesSession
Dim db As NotesDatabase
Dim doc As NotesDocument
Dim newdoc As NotesDocument
Set db=s.currentdatabase
Set doc=s.documentcontext
Set newdoc = db.CreateDocument
Call doc.CopyAllItems(newdoc, True)
newdoc.subject="Fwd: "& newdoc.subject(0)
newdoc.copyto=“”
Call newdoc.send(False, “my@address.com”)
End Sub
That looks simple enough… but when I run it manually I get an ”object variable not defined”
What am I missing?
Also, what would you recommend for the scheduling of when it should run.
Running Domino 8.0.2 (soon to be 8.5.1)