添加多行SMTP电子邮件VB.NET

Question

的身体，我可以使用此代码到我的Exchange服务器

Try 
     Dim SmtpServer As New SmtpClient 
     Dim mail As New MailMessage 
     SmtpServer.Credentials = New Net.NetworkCredential() 
     SmtpServer.Port = 25 
     SmtpServer.Host = "email.host.com" 
     mail = New MailMessage 
     mail.From = New MailAddress("myemail@email.com") 
     mail.To.Add("otheremail@email.com") 
     mail.Subject = "Equipment Request" 
     mail.Body = "This is for testing SMTP mail from me" 


     SmtpServer.Send(mail) 

    catch ex As Exception 
     MsgBox(ex.ToString) 
    End Try 

但我怎么可以添加多行到身体上发送电子邮件？

Answer 1

只要把它当作正常的文本对象，你可以在句子之间使用Environment.NewLine或vbNewLine。

StringBuilder在这里很有用：

Dim sb As New StringBuilder 
sb.AppendLine("Line One") 
sb.AppendLine("Line Two") 

mail.Body = sb.ToString() 

Answer 2

喜欢这个？

Dim myMessage as String = "This is for testing SMTP mail from me" + Environment.NewLine 
myMessage = myMessage + "Line1" + Environment.NewLine 

然后

mail.Body = myMessage 

Answer 3

我想创建一个变量为您的身体，然后添加到mail.Body所以它会是这个样子。

Try 
    Dim strBody as string = "" 
    Dim SmtpServer As New SmtpClient 
    Dim mail As New MailMessage 
    SmtpServer.Credentials = New Net.NetworkCredential() 
    SmtpServer.Port = 25 
    SmtpServer.Host = "email.host.com" 
    mail = New MailMessage 
    mail.From = New MailAddress("myemail@email.com") 
    mail.To.Add("otheremail@email.com") 
    mail.Subject = "Equipment Request" 
    strBody = "This is for testing SMTP mail from me" & vbCrLf 
    strBody += "line 2" & vbCrLf 
    mail.Body = strBody 

    SmtpServer.Send(mail) 

catch ex As Exception 
    MsgBox(ex.ToString) 
End Try 

这将追加换行符，并且您应该在电子邮件中包含每行。

Answer 4

尝试在字符串中system.environment.newline ...应该工作

Answer 5

如果你的消息的主体必须是HTML格式，添加<br>标签就在您的字符串。如果正文为HTML格式，则vbCrLf和StringBuilder不起作用。

Dim mail As New MailMessage 
mail.IsBodyHtml = True 
mail.Body = "First Line<br>" 
mail.Body += "Second Line<br>" 
mail.Body += "Third Line" 

如果它不是HTML格式，这里的其他答案似乎是好的。