很简单的 '--------發送郵件--------- Dim sql As String Dim MailReader As SqlDataReader Dim Mailto As String Dim Mailfrom As String Dim contentHtml As String = GetMailBody(1) Dim titleHtml As String = GetMailBody(0) Dim Toname As String Dim mymail As New MailMessage mymail.From = txtboxmail.Text mymail.To = txtboxto.Text mymail.Cc = txtboxcc.Text mymail.Bcc = txtboxbcc.Text mymail.Subject = "來自 新聞發佈系統的電子郵件(寄信者:" & txtboxname.Text & ")" mymail.BodyFormat = MailFormat.Html mymail.Body = "<html><head><title></title></head><body>" mymail.Body += "<TABLE height='302' cellSpacing='1' cellPadding='0' width='734' border='0'>" ‘ 这里面就写发的mail的html样式,包括图片。web上怎么用html显示这里就怎么写 mymail.Body += "</TABLE>" mymail.Body += "</body>" mymail.Body += "</html>" SmtpMail.Send(mymail)
Dim sql As String
Dim MailReader As SqlDataReader
Dim Mailto As String
Dim Mailfrom As String
Dim contentHtml As String = GetMailBody(1)
Dim titleHtml As String = GetMailBody(0)
Dim Toname As String Dim mymail As New MailMessage
mymail.From = txtboxmail.Text
mymail.To = txtboxto.Text
mymail.Cc = txtboxcc.Text
mymail.Bcc = txtboxbcc.Text
mymail.Subject = "來自 新聞發佈系統的電子郵件(寄信者:" & txtboxname.Text & ")"
mymail.BodyFormat = MailFormat.Html
mymail.Body = "<html><head><title></title></head><body>"
mymail.Body += "<TABLE height='302' cellSpacing='1' cellPadding='0' width='734' border='0'>"
‘ 这里面就写发的mail的html样式,包括图片。web上怎么用html显示这里就怎么写
mymail.Body += "</TABLE>"
mymail.Body += "</body>"
mymail.Body += "</html>"
SmtpMail.Send(mymail)
{
MailMessage msgMail = new MailMessage();
msgMail.From= fromAddress;
msgMail.To= toEAddress;
msgMail.Subject = subject;
msgMail.BodyFormat =MailFormat.Text;
msgMail.Body = sMsg; bool flag = false;
try
{
SmtpMail.SmtpServer = mailServer;
SmtpMail.Send(msgMail);
flag = true;
}
catch (Exception ex)
{
flag = false;
}
return flag;
}
mymail.BodyFormat = MailFormat.Text;
mymail.Body = "<html><head><title></title></head><body>"
mymail.Body += "<TABLE height='302' cellSpacing='1' cellPadding='0' width='734' border='0'>";