2

我们正在尝试将 html 字符串的输出发送到特定的测试电子邮件地址，并在运行时发现此错误：

A recipient must be specified.

这是来自代码隐藏文件的编码。

Protected Sub EmailTheList()

    ' Get the rendered HTML.
    '-----------------------
    Dim SB As New StringBuilder()
    Dim SW As New StringWriter(SB)
    Dim htmlTW As New HtmlTextWriter(SW)

    GridViewSummary.RenderControl(htmlTW)

    ' Get the HTML into a string.
    ' This will be used in the body of the email report.
    '---------------------------------------------------
    Dim dataGridHTML As String = SB.ToString()

    Dim SmtpServer As New SmtpClient()
    SmtpServer.Credentials = New Net.NetworkCredential("myEmailAddress@gmail.com", "myPassword")
    SmtpServer.Port = 587
    SmtpServer.Host = "smtp.gmail.com"
    SmtpServer.EnableSsl = True

    ObjMailMessage = New MailMessage()

    Try
        ObjMailMessage.From = New MailAddress("myEmailAddress@gmail.com", "Some text is here.", System.Text.Encoding.UTF8)

        ObjMailMessage.Subject = "Test message from Emad"
        ObjMailMessage.ReplyToList.Add("john.doe@example.com")
        ObjMailMessage.Body = dataGridHTML

        ObjMailMessage.DeliveryNotificationOptions = DeliveryNotificationOptions.OnFailure

        SmtpServer.Send(ObjMailMessage)

    Catch ex As Exception
        MsgBox(ex.ToString())
    End Try
End Sub

我们怀疑我们没有为这一行使用正确的语法：

ObjMailMessage.From = ObjMailMessage.ReplyToList.Add("john.doe@example.com")
4

1 回答 1

3

您缺少收件人：地址，这导致有关收件人的错误。

ObjMailMessage.To.Add(New MailAddress("mail@somemail.com", "An error happened", System.Text.Encoding.UTF8))

参考：http: //msdn.microsoft.com/en-us/library/system.net.mail.mailmessage.aspx

于 2012-11-28T14:39:16.587 回答