Solved

lotus notes agent to move incoming mail to folder (based on part of subject)

Posted on 2009-04-07
4
1,318 Views
Last Modified: 2013-12-18
i would like to have an agent that moves an incoming mail to a folder,
but only mails that contain a certain text in the mail body.
other mails will stay in the inbox or will be ove to another folder based on another text.

eg. when the subject contains the text '52.9 ritverzamellijst', the incoming mail should be moved to the same folder '52.9 ritverzamellijst'.
i tried with the attached code, but apparently there's something wrong with the routines that find the text in the body, because the mail stays in the inbox and is not moved.

any expert can fix this code ?
Sub Initialize
	Dim s As New NotesSession
	Dim doc As NotesDocument
	Dim it  As NotesItem
	Dim SPAM As String
	myident = "52.9 ritverzamellijst" ' make this your identifier 
	Set doc = s.documentcontext
	
	Print "Processing " & doc.subject(0) " from " & doc.From(0)
	Set it = doc.GetFirstItem("Body")
	If it Is Nothing Then
		Print "Exiting"
	Else
		Dim stringMyIdent
		stringMyIdent = it.Text
		If Instr( stringMyIdent, myident ) > 0 Then
			Call doc.PutInFolder("52.9 ritverzamellijst", False )
			Print "--> moving to folder  ---"
			Call doc.RemoveFromFolder( "($Inbox)" )
			Print "--> removing from inbox ---"
		Else
			Print "--> does not contain 52.9 ritverzamellijst ---"
		End If
	End If
End Sub

Open in new window

0
Comment
Question by:Lieven Embrechts
  • 2
  • 2
4 Comments
 
LVL 5

Expert Comment

by:daj_uk
ID: 24086336
Would it not be simpler to use a mail rule?  As this feature is already built into the mail template

0
 
LVL 9

Author Comment

by:Lieven Embrechts
ID: 24086376
a mail rule on mail BODY ?  i use notes 7.0.2.
0
 
LVL 5

Accepted Solution

by:
daj_uk earned 500 total points
ID: 24086400
yes, see attached screen shot...
screen.jpg
0
 
LVL 9

Author Comment

by:Lieven Embrechts
ID: 24088176
yup, it's already solved.
i forgot there's something like 'mail rules' next to 'quick rules'.
or i need glasses...
thanks for your quick help !
0

Featured Post

Free Tool: SSL Checker

Scans your site and returns information about your SSL implementation and certificate. Helpful for debugging and validating your SSL configuration.

One of a set of tools we are providing to everyone as a way of saying thank you for being a part of the community.

Question has a verified solution.

If you are experiencing a similar issue, please ask a related question

This article covers general Notes 8.5 troubleshooting information including recreating the Notes\Data folder.
Article by: Rob
Notes 8.5 Archiving Steps and Tips This article covers setting up a Notes archive, and helps understand some of the menu choices making setting up and maintaining a Notes archive file easier.
In an interesting question (https://www.experts-exchange.com/questions/29008360/) here at Experts Exchange, a member asked how to split a single image into multiple images. The primary usage for this is to place many photographs on a flatbed scanner…

828 members asked questions and received personalized solutions in the past 7 days.

Join the community of 500,000 technology professionals and ask your questions.

Join & Ask a Question