Ananth M 23.Apr.09 01:38 PM a Web browser Domino Designer7.0.3 FP1; 7.0.3; 7.0.2 FP3; 7.0.2 FP2; 7.0.2 FP1; 7.0.2; 7.0.1 FP1; 7.0.1; 7.0; 6.5.6; 6.5.5 FP3; 6.5.5 FP2; 6.5.5 FP1; 6.5.5; 6.5.4 FP3; 6.5.4 FP2; 6.5.4 FP1; 6.5.4; 6.5.3 FP2; 6.5.3 FP1; 6.5.3; 6.5.2 FP1; 6.5.2; 6.5.1; 6.5; 6.0.5; 6.0.4; 6.0.3; 6.0.2 CF2; 6.0.2 CF1; 6.0.2Windows Vista; Windows 2003; Windows 2000; Windows XP; Windows NT; Windows 95; Windows 98
Hi,
Does anyone know how to send replymessage with history? In other words, I have an agent that has to send an auto reply for all the incoming emails. This should be written in lotus script as I have something else to do with that. I am used createreplymessage method. When I am getting the content of body in incoming message, I do not see any value there. Could you please let me know how to sent it with old history?
My code is below
Set reply = memo.CreateReplyMessage( False )
reply.form = "Autoreply"
reply.Principal = "DoNotReply@prudential.com"
reply.From = "DoNotReply@prudential.com"
reply.Subject = profiledoc.txt_Subject(0)
reply.sendTo = "ananth.mariappan@prudential.com"
Dim rti As New NotesRichTextItem(reply, "Body")
bodyMsg = profiledoc.txt_Body(0)
Call rti.AppendText(bodyMsg)
Call rti.AddNewLine(2)
Call session.UpdateProcessedDoc( memo )
//I am getting problem here in below mail. Though Body has some values, it returns empty string.
Dim rtiPre As New NotesRichTextItem(memo, "Body")
Call rti.AppendRTItem(rtiPre)
Call reply.Send( True )
Return to top
Print this page
