Autor Thema: Agent Mail versenden einfache Aktion  (Gelesen 2605 mal)

Offline Sommersprosse

  • Senior Mitglied
  • ****
  • Beiträge: 296
  • Geschlecht: Weiblich
Agent Mail versenden einfache Aktion
« am: 23.05.14 - 08:51:23 »
Hallo zusammen,

noch ein Problem das ich habe...
Wir haben eine Mail-in DB erstellt über die Bestellungen über eine Allgemeine Adresse eingehen.
Über Agent - Einfache Aktion - wird einem im Agent definierten Verteiler ein Link mit dem Hinweis auf neue Mail verschickt.

Nun wollen die Herren den Betreff der Mail die in der Mail-DB eintrifft in der weitergeleiteten mail ebenfalls im Betreff haben um eine Vorsortierung anhand der mail schon machen zu können.

Wahrscheinlich geht das mit der einfachen Aktion nicht, soviel weiß ich, ich habe auch schon mal Mail sends gemacht in verschiedenen Agents, aber ne Abfrage auf eine einkommende Mail und die Infos entsprechend weiterleiten, keine Ahnung.

Hab mir mal das Konstrukt aus der Helpline angeschaut, aber da fehlt auch die Information mit Betreff aus der Mail....

Für jeden Hinweis bin ich dankbar.
Gruß Ulli

Offline umi

  • Gold Platin u.s.w. member:)
  • *****
  • Beiträge: 2.062
  • Geschlecht: Männlich
  • one notes to rule'em all, one notes to find'em....
    • Belsoft AG
Re: Agent Mail versenden einfache Aktion
« Antwort #1 am: 23.05.14 - 09:28:50 »
Moin

Schon mal probiert, dies über eine Rule zu lösen?
Gruss

Urs

<:~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
Jegliche Schreibfehler sind unpeabischigt
http://www.belsoft.ch
~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~:>

Offline Sommersprosse

  • Senior Mitglied
  • ****
  • Beiträge: 296
  • Geschlecht: Weiblich
Re: Agent Mail versenden einfache Aktion
« Antwort #2 am: 23.05.14 - 09:53:22 »
Hab ich nicht, nur so auf die schnelle reingeschaut, kann ich keine Copy Empfänger definieren, und die brauche ich.

Die Option Alle Dokumente und Kopfzeile würde da schon helfen denke ich aber ich brauche auch Kopie Empfänger.... was zu klären wäre.

Es soll ja nicht ein bestimmter Betreff gefiltert werden, sondern der Betreff immer mitgegeben werden.
UnprocessedDocuments eine Lösung??
Gruß Ulli

Offline umi

  • Gold Platin u.s.w. member:)
  • *****
  • Beiträge: 2.062
  • Geschlecht: Männlich
  • one notes to rule'em all, one notes to find'em....
    • Belsoft AG
Re: Agent Mail versenden einfache Aktion
« Antwort #3 am: 23.05.14 - 09:57:17 »
Moin

Dann mit einem Agenten. Trigger: After mail arrived und mit db.unprocessed Documents kommst Du an die neuen mails.
Kannst auch sicherheitshalber die verarbeiteten zusätzlich noch mit einem Zeitstempel/flag versehen um zu vermeiden, dass da irgendwie doppelte Mails rausgehen.
Gruss

Urs

<:~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
Jegliche Schreibfehler sind unpeabischigt
http://www.belsoft.ch
~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~:>

Offline Sommersprosse

  • Senior Mitglied
  • ****
  • Beiträge: 296
  • Geschlecht: Weiblich
Re: Agent Mail versenden einfache Aktion
« Antwort #4 am: 23.05.14 - 10:05:19 »
Ich habs mir fast gedacht, dann werd ich mir den mal zu Gemüte führen und mich reinlesen...

Mit Flag setzen gute Idee, doppelte mails wäre gaaanz schlecht.

Funktioniert dann wahrscheinlich auch zuverlässiger als die normalen einfachen Aktionen.

Danke erst mal, wenn ich nicht weiter komme melde ich mich wieder.

Gruß Ulli

Offline Sommersprosse

  • Senior Mitglied
  • ****
  • Beiträge: 296
  • Geschlecht: Weiblich
Re: Agent Mail versenden einfache Aktion
« Antwort #5 am: 28.05.14 - 09:42:21 »
Hallo zusammen,

hab mich jetz mal mit der Thematik beschäftigt, eine Sache die mir jetzt noch nicht ganz klar ist, wie kann ich den Betreff der Mails aus der Collection auslesen?

Steh da noch aufm Schlauch.

Hab bis jetzt folgendes Konstrukt (bin Anfänger....), verbesserungsfähig, wenn die Logik nicht stimmt, bitte sagen und ist auch noch nicht fertig...
Mail Empfänger sind auch noch keine definiert...

Code
Sub Initialize
	Dim session As NotesSession
	Dim doccol As NotesDocumentCollection
	Dim doc As NotesDocument
	Dim maildoc As NotesDocument
	Dim bodyitem As NotesRichTextItem
	Dim db As NotesDatabase
	
	Set db = session.Currentdatabase
	Set doccol = session.currentdatabase.Unprocesseddocuments
	
	Set doc = doccol.getfirstdocument
	
	While Not (doc Is Nothing)
		Set maildoc = New NotesDocument (db)
		maildoc.form="Memo"
		maildoc.principal="New information"
		
		maildoc.Subject=doc. --> hier sollte mein Betreff stehen.
		
		Set bodyitem=maildoc.CreateRichTextItem("Body")
		bodyitem.AppendText "New information in  "
	 	bodyitem.AppendText " muss der Betreff der Mail rein."
		Call bodyitem.AppendDocLink( doc, "" )  
		
		maildoc.Send False
	wend
End Sub

Danke schon mal.

Gruß Ulli

Offline umi

  • Gold Platin u.s.w. member:)
  • *****
  • Beiträge: 2.062
  • Geschlecht: Männlich
  • one notes to rule'em all, one notes to find'em....
    • Belsoft AG
Re: Agent Mail versenden einfache Aktion
« Antwort #6 am: 28.05.14 - 10:03:08 »
Moin

Du könntest z.B.

Code
  ...
  call maildoc.replaceitemvalue("Subject",doc.getitemvalue("subject")) 

  ...
  call maildoc.replaceitemvalue("SendTo","<empfänger>")
  ...
  set doc=doccol.getnextdocument(doc)
wend

machen.

Getnextdocument nicht vergessen sonst läuft dein Agent ewig.
SendTo nicht vergessen, sonst wird dein Mail nicht geschickt.
« Letzte Änderung: 28.05.14 - 10:05:49 von umi »
Gruss

Urs

<:~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
Jegliche Schreibfehler sind unpeabischigt
http://www.belsoft.ch
~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~:>

Mitch

  • Gast
Re: Agent Mail versenden einfache Aktion
« Antwort #7 am: 28.05.14 - 10:13:41 »
Code
     maildoc.Subject=doc. --> hier sollte mein Betreff stehen.

Suchst du etwa bloß das hier? Siehe:
Code
     maildoc.Subject=doc.NameDesItemsInDemDeinBetreffSteht(0)

Gruß,

Mitch

Offline Sommersprosse

  • Senior Mitglied
  • ****
  • Beiträge: 296
  • Geschlecht: Weiblich
Re: Agent Mail versenden einfache Aktion
« Antwort #8 am: 28.05.14 - 10:45:00 »
..das habe ich gesucht. Hätte es komplizierter gelöst, aber dafür gibt es Euch die Ihr schon länger programiiert wie ich.

Code
  ...
  call maildoc.replaceitemvalue("Subject",doc.getitemvalue("subject")) 

  ...
  call maildoc.replaceitemvalue("SendTo","<empfänger>")
  ...
  set doc=doccol.getnextdocument(doc)
wend

Danke umi
Gruß Ulli

 

Impressum Atnotes.de  -  Powered by Syslords Solutions  -  Datenschutz