Notes Agent

[make_fun]

Hallo,

ich bin ziemlich neu bei Lotus Notes, aber soll einen Agenten einrichten, soweit das möglich ist, der automatisch auf eine Mail antwortet die reinkommt und eine Datei anhängen.

Wie muß ich da anfangen, denn ein Agent der startet nach Maileingang kann leider keine Datei mit versenden ... oder doch?  

Danke schonmal im voaus für die Hilfe...

make_fun

[doliman]

Hi,

kann nicht ??!!
Warum nicht?
Was für eine Datei soll den angehängt werden?

[make_fun]

Hallo,

z.B. eine pdf-Datei. Ist aber doch eigentlich egal ?!

Ich hab aber absolut keinen Plan, wie ich das machen soll oder kann.

make_fun

[doliman]

Hi,

probier mal das hier:

Dim session As New NotesSession
Dim db As NotesDatabase
Dim doc As NotesDocument
Dim object As NotesEmbeddedObject
Dim rtitem As NotesRichTextItem

Set db = session.CurrentDatabase
Set doc = New NotesDocument( db )
Set rtitem = New NotesRichTextItem( doc, "Body" )
Set object = rtitem.EmbedObject _
( EMBED_ATTACHMENT, "", "c:\datein.txt")

doc.Form = "Memo"
doc.SendTo = "Empfänger"
doc.Subject = "Hier das Dokument im Anhang"

Call doc.Send( False )

[make_fun]

Hallo,

ich kenne mich damit nicht so wirklich aus, aber wenn ich das Script in einen agenten einbinde, passiert nicht wirklich was.

make_fun

[doliman]

Hi,

diverse Anpassungen muß man da schon noch treffen!
Es sollten ja nur die Rahmendaten sein.
Wie viel kennst Du Dich in Script aus?

[make_fun]

kaum bis garnicht?? Da ich mich bisher noch nicht damit beschäftigt hatte, bin ich noch ein ziemlilcher Anfänger was dies betrifft.

make_fun

[doliman]

Hi,

schau mal in der Designerhilfe unter der Klasse NotesDocument und der Funktion send. Da hats ein Beispiel dabei wie das geht. Das baust Du in den Agenten hinein.
Dann solltest Du dem Agenten sagen was er wann tun soll.