【问题标题】:Feedback form produces error反馈表产生错误
【发布时间】:2013-03-14 09:02:50
【问题描述】:

我正在尝试制作反馈表,但以前从未这样做过。我找到了一个在 VB 中解释它的教程,但即使代码对他有用,它似乎对我不起作用。失败后,我又尝试了另一个教程,但仍然不行!但由于第一个看起来更简单,我决定再试一次。有人可以帮我解释一下我做错了什么吗?

我有 4 个文本框 NameEmailTelephoneComments

错误似乎是由

Dim message As MailMessage = New MailMessage(from, "jaun@bulldogbroadband.co.za", "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, "jaun@bulldogbroadband.co.za", "feedback", body)
    Dim mailClient As SmtpClient = New SmtpClient

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

【问题讨论】:

    标签: vb.net email feedback


    【解决方案1】:

    我认为它失败了,因为“发件人”地址不是有效的电子邮件地址。 此外,您调用 SendMail 两次,第二次使用电话号码和 cmets 作为参数。

    【讨论】:

      【解决方案2】:

      已修复,仍然不明白出了什么问题,因为电子邮件地址是有效的,我不知道我是否可以这样做,但我将粘贴我当前使用的代码,因为似乎堆栈溢出有非常严格的规则

      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("jaun@bulldogbroadband.co.za", "1@2345")
          MM.Credentials = cred
          MM.Send(txtEmail.Text, "jaun@bulldogbroadband.co.za", "feedback form", body)
      
          Response.Redirect("ThankYou.aspx")
      
      End Sub
      

      结束类

      【讨论】:

        猜你喜欢
        • 1970-01-01
        • 1970-01-01
        • 2017-03-20
        • 1970-01-01
        • 1970-01-01
        • 1970-01-01
        • 1970-01-01
        • 2016-04-10
        • 2018-06-24
        相关资源
        最近更新 更多