System.Web.Mail
http://www.systemwebmail.com/faq/4.1.aspx ------------ Dim NewMail As SmtpMail Dim message As New MailMessage Dim mailID As String = ConfigurationSettings.AppSettings("MailID") Dim mailPwd As String = ConfigurationSettings.AppSettings("MailPwd") NewMail.SmtpServer = ConfigurationSettings.AppSettings("MailServer") message.BodyFormat = Mail.MailFormat.Html message.From = ConfigurationSettings.AppSettings("FromAddr") message.Priority = MailPriority.High '指定電子郵件訊息有高優先權 message.To = ToAddr '收件人mail message.Fields.Add("http://schemas.microsoft.com/cdo/configuration/smtpserver", ConfigurationSettings.AppSettings("MailServer")) message.Fields.Add("http://schemas.microsoft.com/cdo/configuration/smtpserverport", 25) message.Fields.Add("http://schemas.microsoft.com/cdo/configuration/sendusing", 2) message.Fie