反饋表單會產生錯誤

我正在嘗試提供反饋表單，但從未做過此操作。我找到了一個在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

反饋表單會產生錯誤

回答

相關問題