Auto reply to emails having particular Subject

hello, did you try to create a rule for this ?

Hi,

Depends on the mail client but an email rule would be the most appropriate option - for example you could say when new mail arrives which contains 'Test', send reply.

Have a look here:

http://office.microsoft.com/en-us/outlook-help/create-a-rule-HP005242897.aspx

Regards,


RobMobility.

Or here:

http://office.microsoft.com/en-us/outlook-help/manage-e-mail-messages-with-rules-HA010355682.aspx

Regards,


RobMobility.

Hi. Thanks for your replies.... I am talking about Lotus Notes... this is the Lotus Notes Zone right or not?  Sorry if I posted in the wrong.

Lotus Notes (6.5) doesn't have REPLY in the Rules... that would have solved it.

Hi,

I believe you have the option to reply when creating an agent?

Create, Agent and then select the scripting you want to use. This might help:

http://elearning5.unibg.it/help/help65_client.nsf/b3266a3c17f9bb7085256b870069c0a9/2110cfd1bf628b1785256dff00621247?OpenDocument

Regards,


RobMobility.

Yes there is areply but cannot filter on which subject line.

I have found this code on this website and did minor changes as required, put it in an agent but stil not working.


 

Sub Initialize
	Dim s As New NotesSession 
	Dim db As NotesDatabase
	Dim doc As NotesDocument
	
	Set doc = s.DocumentContext		
	Set db = s.CurrentDatabase 'Set variables 
	
	Subj = doc.GetItemValue( "Subject" )
	Frm = doc.GetItemValue( "From" )
	
	If Instr(1, Lcase(Subj(0)), "(career)") = 0  Then
		Set maildoc = New NotesDocument (db)
		maildoc.Form = "Memo"
		maildoc.SendTo = Frm(0)
		maildoc.Principal = "Auto Notification"
		maildoc.ReplyTo = "myemail@mydomain.com"
		maildoc.Subject = "RE:" & Trim$(Subj(0)) & " (Auto Notification)"
		Set rtitem = doc.GetFirstItem( "Body" )
		
'		Produce contents of reply
		Set rti = New NotesRichTextItem (maildoc, "Body")
		Call rti.AppendText ("THIS IS AN AUTOMATED E-MAIL -- PLEASE DO NOT REPLY TO THIS E-MAIL")
		Call rti.AddNewLine( 2 )
		Call rti.AppendText ("----------------------------------------------------------")
		Call rti.AddNewLine( 2 )
		Call rti.AppendText(rtitem.Text)
		Call maildoc.Send(False)
	End If
End Sub

Select allOpen in new window

Any idea why?

Thanks

PS: I have tried both

If Instr(1, Lcase(Subj(0)), "(career)") = 0

and

If Instr(1, Lcase(Subj(0)), "(career)") > 0

as was not sure which one returns true when subject is career

Hi,

Have you tried using simple functions:

Document Selection =  field Subject contains Career
Action =  Reply to sender

Regards,


RobMobility.