G
Greg Sedeo
My code works fine without the read receipt request.. with it the message
does not send, does not give and error..
<!--METADATA TYPE="typelib" UUID="CD000000-8B95-11D1-82DB-00C04FB1625D"
NAME="CDO for Windows 2000 Library" -->
<%
Set cdoConfig = Server.CreateObject("CDO.Configuration")
With cdoConfig.Fields
.Item(cdoSendUsingMethod) = cdoSendUsingPort
.Item(cdoSMTPServer) = "my.emailserver.com"
.Update
End With
Set cdoMessage = Server.CreateObject("CDO.Message")
With cdoMessage
Set .Configuration = cdoConfig
.From = "(e-mail address removed)"
.To = "(e-mail address removed)"
.Subject = "sdfsdf"
.htmlBody = "asdsada"
.fields("urn:schemas:mailheader:disposition-notification-to") =
"(e-mail address removed)"
.fields("urn:schemas:mailheader:return-receipt-to") =
"(e-mail address removed)"
.DSNOptions = cdoDSNSuccessFailOrDelay
.DSNOptions = 14
.fields.update
.Send
End With
Set cdoMessage = Nothing
Set cdoConfig = Nothing
%>
Any suggestions?
does not send, does not give and error..
<!--METADATA TYPE="typelib" UUID="CD000000-8B95-11D1-82DB-00C04FB1625D"
NAME="CDO for Windows 2000 Library" -->
<%
Set cdoConfig = Server.CreateObject("CDO.Configuration")
With cdoConfig.Fields
.Item(cdoSendUsingMethod) = cdoSendUsingPort
.Item(cdoSMTPServer) = "my.emailserver.com"
.Update
End With
Set cdoMessage = Server.CreateObject("CDO.Message")
With cdoMessage
Set .Configuration = cdoConfig
.From = "(e-mail address removed)"
.To = "(e-mail address removed)"
.Subject = "sdfsdf"
.htmlBody = "asdsada"
.fields("urn:schemas:mailheader:disposition-notification-to") =
"(e-mail address removed)"
.fields("urn:schemas:mailheader:return-receipt-to") =
"(e-mail address removed)"
.DSNOptions = cdoDSNSuccessFailOrDelay
.DSNOptions = 14
.fields.update
.Send
End With
Set cdoMessage = Nothing
Set cdoConfig = Nothing
%>
Any suggestions?