Domino 9 und frühere Versionen > ND6: Entwicklung

Mail per Agent vor Zustellung in bestimmten Ordner verschieben (Formula)

<< < (2/2)

koehlerbv:
Nochmal: "Before new mail" erlaubt Dir keinen Zugriff auf Inhalte. Das bringt also nichts.
Ich denke, hier sind eher die erfahrenen Admins gefragt. Wenn Du einen Agent einbaust, musst Du ja auch dafür sorgen, dass dieser in allen Mailfiles arbeitet. Somit hast Du ein ähnliches Problem wie mit den Regeln.

Bernhard

Xantox:
hallo bernhard,

lt. dem artikel "out of the inbox" sollte es gehen, bzw. habe ich das so verstanden.

das erste beispiel (leider in LS) würde eigentlich schon fast das machen, was ich benötige:

http://www-128.ibm.com/developerworks/lotus/library/ls-Mail_processing_with_R5_mail_agents/index.html


--- Zitat ---Example One: Filing a message

This LotusScript agent files a message into a folder other than Inbox if the subject of the message is "Vacation request."


Sub Initialize
Dim session As New NotesSession
Dim note As NotesDocument
Dim dbug As NotesLog
Dim db As NotesDatabase
Dim it As NotesItem
Set session = New NotesSession
Set sourcedb = session.CurrentDatabase
REM Log steps in our processing for debug purposes
Set dbug = New NotesLog("Router log")
dbug.LogActions = True
dbug.OpenAgentLog
dbug.LogAction("begin")
Set db = session.CurrentDatabase
REM  Make sure we have the note set correctly
If db Is Nothing Then dbug.LogAction("db is not set") Else dbug.LogAction("db is set")
Set note = session.DocumentContext
If note Is Nothing Then dbug.LogAction("note is not set") Else dbug.LogAction("note is set")
REM Note the Subject of all messages
dbug.LogAction("Subject ->" + note.Subject(0))
REM Is this message has the special subject, store it in the special folder
If note.Subject(0) = "vacation request" Then
Call note.PutInFolder( "Vacation" )
   REM PutInFolder leaves a message in the Inbox view as well. 
   REM Since we want to have it only the Vacation Folder we need to remove it from Inbox
   Call note.RemoveFromFolder("($InBox)")
   dbug.LogAction("File into Vacation Folder")
End If
dbug.LogAction("done")
dbug.Close
End Sub
--- Ende Zitat ---

danke für deine antworten. ich überlege und suche mal weiter :)

koehlerbv:
Hallo Stefan,
Schande über mein Haupt - so geht es natürlich doch. Und Julie hat sowieso Recht  ;)

Sorry, dass meine Finger beim Schreiben schneller als das Hirn beim Denken waren. Beim Lesen von Julies Artikel fielen mir natürlich auch sofort Apps ein, in denen ich das selber so verwendet habe.

Auf die Repliken erfahrener Profi(!)-Admins würde ich trotzdem noch warten.

Bernhard

Xantox:
Das kann jedem mal passieren ;)

vielleicht wissen unsere profi admins hier noch ne idee bzw. haben noch eine anmerkung zum dem agenten. nachdem der ja auf dem router läuft und jede mail-db bedienen soll, muss der sehr performant sein - sonst seh ich schwierigkeiten auf mich zukommen ;)

falls ich was neues herausfinde, poste ich es hier als update.

schönes wochenende,

stefan

Navigation

[0] Themen-Index

[*] Vorherige Sete