反馈表单会产生错误

我正在尝试提供反馈表单，但从未做过此操作。我找到了一个在VB中解释它的教程，但即使代码适用于他，它似乎也不适用于我。失败后，我尝试了另一个教程，仍然没有去！但由于第一个看起来更简单，我决定再试一次。有些人可以帮我解释我做错了什么吗？反馈表单会产生错误

我有4个文本框Name，Email，Telephone和Comments

的错误似乎是

Dim message As MailMessage = New MailMessage(from, "[email protected]", "feedback", body)

错误：指定的字符串不是一个电子邮件地址所要求的形式。

教程：[How Do I:] Create a "Contact Us" Page?

Protected Sub btnSend_Click(sender As Object, e As EventArgs) Handles btnSend.Click 
    SendMail(txtName.Text, txtEmail.Text) 
    SendMail(txtTel.Text, txtComments.Text) 
End Sub 
Private Sub SendMail(ByVal from As String, ByVal body As String) 
    Dim mailServerName As String = "SMTP.bulldogbroadband.co.za" 
    Dim message As MailMessage = New MailMessage(from, "[email protected]", "feedback", body) 
    Dim mailClient As SmtpClient = New SmtpClient 

    mailClient.Host = mailServerName 
    mailClient.Send(message) 
    message.Dispose() 
End Sub

来源

2013-03-14 Jaun Lloyd

修复它，仍然不明白什么地方出错，因为电子邮件地址是有效的，我不知道我是否被允许这样做，但我要粘贴我目前使用的代码，因为它似乎堆栈溢出具有非常严格的规定

Imports System.Net.Mail 
Imports System.Text 
Partial Class ContactUs 

Inherits System.Web.UI.Page 

Protected Sub btnSend_Click(sender As Object, e As EventArgs) Handles btnSend.Click 
    Dim body As String = "From: " + txtName.Text + Environment.NewLine +_ 
"Email: " + txtEmail.Text + Environment.NewLine + "Contact Number: " +_ 
txtTel.Text + Environment.NewLine + Environment.NewLine + txtComments.Text 

    Dim MM As New System.Net.Mail.SmtpClient 
    MM.Host = "mail.bulldogbroadband.co.za" 
    Dim cred As New System.Net.NetworkCredential("[email protected]", "[email protected]") 
    MM.Credentials = cred 
    MM.Send(txtEmail.Text, "[email protected]", "feedback form", body) 

    Response.Redirect("ThankYou.aspx") 

End Sub

末级

来源

2013-03-17 18:35:52

我认为这是失败，因为“从”地址是不是一个有效的电子邮件地址。你还打电话给SendMail两次，第二次以电话号码和评论为参数。

来源

2013-03-15 17:51:06 peterG

反馈表单会产生错误

回答

相关问题