Asp.net 发送电子邮件无法从字符串“转换”&引用；输入'；布尔值'；无效

我做错了什么？每次我做这件事都会出错

发送电子邮件失败。从字符串“”到类型“Boolean”的转换无效

---

请提供帮助。

尝试将此

MM.IsBodyHtml=RadioButtonList1.SelectedValue

更改为此

MM.IsBodyHtml=If（RadioButtonList1.SelectedValue=“True”，True，False）

MM.IsBodyHtml属性是布尔值，而不是字符串（RadioButtonList1.SelectedValue是该字符串）。如何解决此问题，请包括您的

RadioButtonList

标记代码。我想您可以使用

Select Case

创建布尔值并将其传递给

MM.IsBodyHtml

属性。我没有任何

Imports System.Net.Mail
Partial Class ch5_proj4_ch5_proj4
    Inherits System.Web.UI.Page

    Protected Sub EmailBtn_Click(ByVal sender As Object, ByVal e As System.EventArgs) Handles EmailBtn.Click
        ' insert code here
        Dim MySmtpClient As New SmtpClient()

        Dim MM As New MailMessage()
        Try

            MySmtpClient.Host = "stmp.gmail.com"
            MySmtpClient.Port = 587
            MySmtpClient.EnableSsl = True
            MySmtpClient.UseDefaultCredentials = True
            MySmtpClient.Credentials = New System.Net.NetworkCredential()


            'mail message
            MM.To.Add(New MailAddress(TextBox2.Text, TextBox1.Text))
            Dim fromAddress As New MailAddress(TextBox4.Text, TextBox3.Text)
            MM.From = fromAddress
            MM.Subject = TextBox4.Text
            MM.IsBodyHtml = RadioButtonList1.SelectedValue
            MM.Body = txtMessage.Text
            MySmtpClient.Send(MM)
            Label5.Text = "Email successfully sent."

        Catch exc As Exception
            Label5.Text = "Send email failed" + exc.Message

        End Try
        MM = Nothing
        MySmtpClient = Nothing
    End Sub
End Class