Visual Basic - 向电子邮件发送回车符

Question

如何将包含换行符（回车符）的字符串发送到电子邮件？

问题是我将字符串发送到电子邮件，而电子邮件删除了回车符。

Dim myApp As New Process

    emailStringBuilder.Append("mailto:")

    emailStringBuilder.Append("&subject=" & tmpID & " - " & subject)

    emailStringBuilder.Append("&body= " & msgStringBuilder.ToString)

    myApp = System.Diagnostics.Process.Start(emailStringBuilder.ToString)

Answer 1

我猜您正在向 StringBuilder 添加不带换行符的内容，因为我刚刚测试过它并且它对我来说效果很好。

Imports System.Text
Module Module1
    Sub Main()
        Dim sb As New StringBuilder
        sb.AppendLine("Line 1")
        sb.AppendLine("Line 2")
        sb.Append("Line 3" & vbCrLf)
        sb.Append("Line 4 without CRLF")
        sb.Append("Line 5")
        Console.WriteLine(sb.ToString)
    End Sub
End Module

对于上面的代码我得到以下输出

<前><代码>第 1 行
2号线
3号线
没有 CRLF 的第 4 行第 5 行

希望这有帮助。

编辑

好的，所以根据新信息（关于电子邮件），上述内容仍然成立。如果您使用 .Append 添加到字符串生成器，您将丢失，或者更正确地说，看不到换行符。相反，您必须使用 .AppendLine 它将所有重要的 CR 和 LF 代码添加到字符串的末尾。

但是，我有点困惑你如何发送电子邮件。我以前在网页上见过这种方式，但从未在 vb.net 上见过。以这种方式发送电子邮件几乎肯定会迫使您发送没有换行符的电子邮件！

我可以建议您查看 Microsoft 的以下内容，了解如何使用 System.Web.Mail 命名空间从 Visual Basic 发送电子邮件。这并不难，您可以更好地控制通过这种方式发送的电子邮件...

Microsoft示例

Answer 2

对于任何也在寻找可行的发送到电子邮件的东西的人，您想要按照 @CResults 答案中的方式进行操作，但在每一行添加 "%0A" 。这将使其传达给大多数电子邮件客户端。

Answer 3

您还可以通过发送正文为 HTML 格式的电子邮件来实现此目的，如下所示：

当邮件正文为 HTML 格式时，请在字符串中添加
标记。如果正文采用 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 格式，则使用 vbCrLf 或 vbNewLine：

Dim mail As New MailMessage
mail.Body = "First Line" & vbCrLf
mail.Body += "Second Line" & vbNewLine
mail.Body += "Third Line"