R
RobGMiller
Using CDO from Access VBA.
The message will simply dissapear without a trace if DSN is turned on.
The message works perfectly without it.
the method used to activate notification is as follows.
objMessage.From = "(e-mail address removed)"
objMessage.To = "(e-mail address removed)"
objMessage.Subject = "Test Subject"
objMessage.CreateMHTMLBody "file://C:\FullpathOfFile.html"
objMessage.AddAttachment "FullPathOfFile.PDF"
objMessage.Configuration.Fields.Item("http://schemas.microsoft.com/cdo/configuration/sendusing") = 2
objMessage.Configuration.Fields.Item("http://schemas.microsoft.com/cdo/configuration/smtpserver") = "mail.server.com"
objMessage.Configuration.Fields.Item("http://schemas.microsoft.com/cdo/configuration/smtpserverport") =25
objMessage.Configuration.Fields.Update
******************************************************
objMessage.Fields("urn:schemas:mailheader:disposition-notification-to") =
"(e-mail address removed)"
objMessage.Fields("urn:schemas:mailheader:return-receipt-to") =
"(e-mail address removed)"
objMessage.Fields.Update
objMessage.DSNOptions = cdoDSNSuccessFailOrDelay(set to 14)
******************************************************
objMessage.Send
If the part between the ******* lines is left out the message is received.
With that part the messages is never heard of again.
My ISP claims they are not blocking Notification on their mail server which
is specified above. I get the same result using SMTP on windows XPPro-R2
Any thoughts would be welcomed.
RobGMiller
The message will simply dissapear without a trace if DSN is turned on.
The message works perfectly without it.
the method used to activate notification is as follows.
objMessage.From = "(e-mail address removed)"
objMessage.To = "(e-mail address removed)"
objMessage.Subject = "Test Subject"
objMessage.CreateMHTMLBody "file://C:\FullpathOfFile.html"
objMessage.AddAttachment "FullPathOfFile.PDF"
objMessage.Configuration.Fields.Item("http://schemas.microsoft.com/cdo/configuration/sendusing") = 2
objMessage.Configuration.Fields.Item("http://schemas.microsoft.com/cdo/configuration/smtpserver") = "mail.server.com"
objMessage.Configuration.Fields.Item("http://schemas.microsoft.com/cdo/configuration/smtpserverport") =25
objMessage.Configuration.Fields.Update
******************************************************
objMessage.Fields("urn:schemas:mailheader:disposition-notification-to") =
"(e-mail address removed)"
objMessage.Fields("urn:schemas:mailheader:return-receipt-to") =
"(e-mail address removed)"
objMessage.Fields.Update
objMessage.DSNOptions = cdoDSNSuccessFailOrDelay(set to 14)
******************************************************
objMessage.Send
If the part between the ******* lines is left out the message is received.
With that part the messages is never heard of again.
My ISP claims they are not blocking Notification on their mail server which
is specified above. I get the same result using SMTP on windows XPPro-R2
Any thoughts would be welcomed.
RobGMiller