I'm getting this error message when trying to send a mail item created by Aspose Network. Please can anyone provide me a solution (or a workaround)?
Error:
Your message did not reach some or all of the intended recipients.
Subject: Test Aspose Network
Sent: 21/06/2010 11:39
The following recipient(s) cannot be reached:
Test on 21/06/2010 11:39
You do not have permission to send to this recipient. For assistance, contact your system administrator.
MSEXCH:...
Code:
Dim
loMailMessage As Aspose.Network.Mail.MailMessage
loMailMessage = New Mail.MailMessage
'loMailMessage.From = New Mail.MailAddress("test@test.be", "Test", True)
'loMailMessage.From = New Mail.MailAddress("", "", True)
loMailMessage.To.Add(
New Mail.MailAddress("test@test.be", "Test", True))
loMailMessage.Subject =
"Test Aspose Network"
loMailMessage.AddAttachment(
New Mail.Attachment("C:\Documents and Settings\UserX\Desktop\test.ppt"))
loMailMessage.HtmlBody =
"<html><b>test</b> test</html>"
Dim outlookMsg As MapiMessage = MapiMessage.FromMailMessage(loMailMessage)
outlookMsg.SetMessageFlags(MapiMessageFlags.MSGFLAG_UNSENT + MapiMessageFlags.MSGFLAG_FROMME)
outlookMsg.SetStringPropertyValue(MapiPropertyTag.PR_SENDER_EMAIL_ADDRESS,
"")
outlookMsg.SetStringPropertyValue(MapiPropertyTag.PR_SENDER_NAME,
"")
outlookMsg.SetStringPropertyValue(MapiPropertyTag.PR_SENT_REPRESENTING_EMAIL_ADDRESS,
"")
outlookMsg.SetStringPropertyValue(MapiPropertyTag.PR_SENT_REPRESENTING_NAME,
"")
outlookMsg.Save(
"d:\test.msg")
