This property specifies the priority level of current email .
Data Type: Long
This value is placed in message header as "X-Priority" value. Different mail readers may interpret the X-Priority setting differently; some may not interpret it at all. Popular readers interpret "4"=low, "3"=normal and "1"=high.
[Visual Basic 6.0] The following example demonstrates how to send email with EASendMail SMTP Component, but it doesn't demonstrates the events usage. To get the full samples of EASendMail, please refer to Samples section.
[VB6, VBA - Set Email Priority] Private Sub SendEmail() Dim oSmtp As EASendMailObjLib.Mail Dim nPriority As Integer Set oSmtp = New EASendMailObjLib.Mail oSmtp.LicenseCode = "TryIt" nPriority = 1 'High priority oSmtp.ServerAddr = "mail.emailarchitect.net" 'If your server require user authentication 'oSmtp.UserName = "firstname.lastname@example.org" 'oSmtp.Password = "test" oSmtp.FromAddr = "email@example.com" oSmtp.AddRecipient "Support Team", "firstname.lastname@example.org", 0 oSmtp.Priority = nPriority oSmtp.Subject = "Test" oSmtp.BodyText = "Hello, this is a test...." If oSmtp.SendMail() = 0 Then MsgBox "Message delivered!" Else MsgBox oSmtp.GetLastErrDescription() End If End Sub