Wie kann ich "Hohe Bedeutung" auf E-Mail gesendet mit VBA?

Ich habe versucht, ein paar Eigenschaften, die auf dieses Objekt senden Sie eine E-Mail mit hoher Dringlichkeit, aber nichts schien zu funktionieren. Hier ist, was ich versucht habe:

objEmail.Importance = 2

objEmail.Configuration.Fields.Item("urn:schemas:mailheader:X-MSMail-Priority") = "High"      ' For Outlook 2003

objEmail.Configuration.Fields.Item("urn:schemas:mailheader:X-Priority") = 2                  ' For Outlook 2003 also

objEmail.Configuration.Fields.Item("urn:schemas:httpmail:importance") = 2

Function Send(sTo As String, sFrom As String, sSubject As String)
    Set objEmail = CreateObject("CDO.Message")
        objEmail.From = sFrom
        objEmail.To = sTo
        objEmail.Subject = sSubject
        objEmail.Textbody = emailBody
        objEmail.Configuration.Fields("http://schemas.microsoft.com/cdo/configuration/smtpserver") = "my.smtp.server"
        objEmail.Configuration.Fields("http://schemas.microsoft.com/cdo/configuration/sendusing") = 2
        // is there a property for high importance, outlook 2007?
        objEmail.Configuration.Fields.Update        
    objEmail.Send
End Function
Mithilfe der objEmail.Fields.Item eher als objEmail.Configuration.Fields.Item Arbeit?
Sorry Martin, es hat nicht.
Ja ich habe etwas das Vertrauen verloren, dass die Antwort mich nach einigem weiteren googeln.
Haben Sie diesen: classicasp.aspfaq.com/email/how-do-i-alter-the-priority/... ?

InformationsquelleAutor Ian R. O'Brien | 2010-07-21

Schreibe einen Kommentar