Level Extreme platform
Subscription
Corporate profile
Products & Services
Support
Legal
Français
How to Define Priority for CDOMail?
Message
From
05/04/2006 11:15:59
 
General information
Forum:
Visual FoxPro
Category:
Other
Miscellaneous
Thread ID:
01110387
Message ID:
01110614
Views:
11
Hi Sergey,

Thanks for your response. I had a look at the suggested links. I tried to use the priority and/or importance in my code. Somehow, I never see 'High' importance. I am using Outlook to read email. The class that sends the code is something like this.
Declare SHORT InternetGetConnectedState In wininet.Dll;
    INTEGER @lpdwFlags, Integer dwReserved
lConnect=This.displayState()

If lConnect
    iMsg = Createobject("CDO.Message")
    iConf = Createobject("CDO.Configuration")
    Flds = iConf.Fields
    With Flds
        .Item("http://schemas.microsoft.com/cdo/configuration/sendusing") = 2
        .Item("http://schemas.microsoft.com/cdo/configuration/smtpserver") = 'mySmtpserver'
        .Item("http://schemas.microsoft.com/cdo/configuration/smtpserverport") = 25
	.Item("http://schemas.microsoft.com/cdo/configuration/smtpconnectiontimeout") = 90    	
        * Set Priority/Importance to High. 
        .Item("urn:schemas:httpmail:importance") = 2  
        .Item("urn:schemas:mailheader:importance") = "High" 		    
    
        .Item("urn:schemas:httpmail:priority")   = 1 	  
        .Item("urn:schemas:mailheader:priority")   = 1 		

        .Item("urn:schemas:mailheader:X-MSMail-Priority") = "High" 
        .Item("urn:schemas:mailheader:X-Priority") = 1 
		    
    .Update
    ENDWITH
    
    With iMsg
        .Configuration = iConf
        .To = This.To
        .CC = This.CC
        .BCC = This.BCC
        .From = This.From
        .Subject = This.Subject
        IF NOT EMPTY(This.HTMLBody) 
        	 .HTMLBody = This.HTMLBody 
        ENDIF 
        .TextBody = This.TextBody
        
        .Send
    ENDWITH
 ENDIF 
Could you please suggest which commands are required to set the priority/importance high that will work on most email clients, including Outlook?

Thank you so much.

- Ravi
- Ravi Taxali
Visual FoxPro Made Simple An excellent book for beginners as well as experienced programmers
Never Forget Again. Setup Email Reminders.
Previous
Next
Reply
Map
View

Click here to load this message in the networking platform