I've been using the following ASP/
VB email code for some time with no problems:
Code:
<%
Response.Buffer = true
Set objSendMail = Server.CreateObject("CDO.Message")
With objSendMail
.To = "[email protected]"
.From = "[email protected]"
.Subject = "Hello World!"
.HTMLBody = "Hello everyone."
.Importance = 2 'cdoHigh
.Configuration.Fields.Item("http://schemas.microsoft.com/cdo/configuration/sendusing") = 2
.Configuration.Fields.Item("http://schemas.microsoft.com/cdo/configuration/smtpserver") = "MAILSERVERNAME"
.Configuration.Fields.Item("http://schemas.microsoft.com/cdo/configuration/smtpserverport") = 25
.Configuration.Fields.Update
.Send
End With
Set objSendMail = Nothing
%>
But now I'm receiving this error message concerning the "Importance":
Microsoft VBScript runtime error '800a01b6'
Object doesn't support this property or method: 'Importance'
/HelpDesk/bgscripts/testemail.asp, line 14
Besides ".Importance = 2", I've tried the following other options I've seen from several sites without success:
.Fields.Item(cdoImportance) = 2
.Configuration.Fields.Item("urn:schemas:mailheader :X-Priority") = 1
.Fields.Item("urn:schemas:httpmail:importance").Va lue = cdoHigh
.Fields("urn:schemas:httpmail:importance").Value = 2
.Fields.Item("urn:schemas:httpmail:importance").Va lue = 2 'cdoHigh
.Fields.Item("urn:schemas:mailheader:X-MSMail-Priority") = "High"
.Configuration.Fields.Item("urn:schemas:mailheader :X-Priority") = 3
.Configuration.Fields.Item("urn:schemas:httpmail:i mportance") = 3
.Configuration.Fields.Item("urn:schemas:mailheader :X-MSMail-Priority") = 3
If anyone can let me know how I can properly set the importance of the email to high, that would be great. Thanks.
KWilliams
ASP CDOSYS Problem
