Dear Members

I was trying out to send the mail through the Emessager connectors and i have provided the given below Code



if mid <>0 then
stat = cmf.startService(service,2)
if stat<>0 then
message("Message could not be sent "&
"(Infor ERP Enterprise eMessage Connector"&
" service did not start)")
exit()
endif
stat = cmf.send(mid,service)
if stat<>0 then
message("Message could not be sent "&
"(Infor ERP Enterprise eMessage Connector "&
"service refused message)")
cmf.stopService(service,2)
exit()
else
message("Message successfullly sent.....Supposedly")
endif
stat = cmf.stopService(service,2)
endif





message.ID = cmf.create()
body = ttyeno.yes


ret = cmf.setClass(message.ID, "CMF.NOTE")
ret = cmf.setSubject(message.ID, "Sample CMF Message")

|Set FROM recipient
from.ID = cmf.createRecipient(message.ID, ttcmf.role.from)
ret = cmf.setRecipientName(from.ID, "Ajesh")
ret = cmf.setRecipientAddress(from.ID,"ajesh@test.com")
ret = cmf.setRecipientType(from.ID, "BAAN")
|In reality of course the from address could be filled from
|the Address book.

|Set TO recipient
to.ID = cmf.createRecipient(message.ID, ttcmf.role.to)
ret = cmf.setRecipientName(to.ID, recipient.name)
ret = cmf.setRecipientAddress(to.ID, recipient.address)
ret = cmf.setRecipientType(to.ID, "SMTP")
ret = cmf.setRecipientResponsibility(to.ID, "TRUE")





I have put the Recipient Name and Address a valid one. The Message Log says the Message has been successfully sent but i cant get a mail


Regards
Ajesh

Ajesh,

This looks like the standard example code from the Tools Programmer's manual.
I assume you have already completed the SMTP setup on the LN/Baan Application server?

Also, in your code you set the From-address to yourself and not the To-address.

|Set FROM recipient
from.ID = cmf.createRecipient(message.ID, ttcmf.role.from)
ret = cmf.setRecipientName(from.ID, "Ajesh")
ret = cmf.setRecipientAddress(from.ID,"ajesh@test.com")
ret = cmf.setRecipientType(from.ID, "BAAN")
|In reality of course the from address could be filled from
|the Address book.

|Set TO recipient
to.ID = cmf.createRecipient(message.ID, ttcmf.role.to)
ret = cmf.setRecipientName(to.ID, recipient.name)
ret = cmf.setRecipientAddress(to.ID, recipient.address)
ret = cmf.setRecipientType(to.ID, "SMTP")
ret = cmf.setRecipientResponsibility(to.ID, "TRUE")

Mister Rao, the SMTP Server seems to be working as i had created a SMTP Device and it was sending the Mail.

May be the Port Number which i mentioned in the Service Provided is the problem, 25? I tried with 587 but it didnt work...

Also the Recipient Name and Address i had set in LOC previous to this Function..