如何在 asp.net VB 中发送具有高重要性的电子邮件

Question

如何设置下面的代码以在主题行中生成具有高优先级的电子邮件？感谢您的指导。

Private Sub SendEmail(ByVal pharmEmail As String, ByVal backupEmail As String)
    Dim smtpClient As New System.Net.Mail.SmtpClient()
    Dim message As New System.Net.Mail.MailMessage()

    Try
        Dim fromAddress As New System.Net.Mail.MailAddress(WebConfigurationManager.AppSettings("EmailFromAddr"), WebConfigurationManager.AppSettings("EmailFromName"))
        message.From = fromAddress
        message.To.Add(pharmEmail)
        message.Subject = WebConfigurationManager.AppSettings("EmailSubject")
        If (WebConfigurationManager.AppSettings("backupEnabled") = True) Then
            message.CC.Add(backupEmail)
        End If
        message.IsBodyHtml = True
        Dim orderURL As New HyperLink
        orderURL.Text = "here"
        orderURL.NavigateUrl = "http://" & WebConfigurationManager.AppSettings("ServerName") & "/User/ReviewOrder.aspx?orderID=" & webOrderID
        message.Body = "An order was created using the account of " + Profile.FirstName.ToString() + " " + Profile.LastName.ToString() + ". " + WebConfigurationManager.AppSettings("EmailBody") + "<a href='" + orderURL.NavigateUrl + "'>here.</a>"
        'message.Body = WebConfigurationManager.AppSettings("EmailBody") & " " & orderURL.
        smtpClient.Send(message)
    Catch ex As Exception
        ErrorHandler.WriteError(ex.ToString)
        Throw ex
    End Try

Answer 1

我相信您可以在MailMessage 上设置Priority 属性。详情请见MSDN。