无法在 asp.net vb 网站中发送电子邮件

Question

当我填写联系表格时，页面会重新加载，并且没有邮件发送到接收者的电子邮件。

但我还希望当用户按下发送按钮并将一封电子邮件发送给接收者时，会弹出一个消息框，其中包含如下文本：“副本已发送到您的电子邮件”

背后的 ASP.NET vb 代码

进口系统.Net 导入 System.Net.Mail Protected Sub btnSend_Click(ByVal sender As Object, ByVal e As EventArgs) 将邮件暗淡为 MailMessage = New MailMessage() 将 Smtp 调暗为新的 SmtpClient() 将 SmtpUser 调暗为新 System.Net.NetworkCredential() Message.From = New MailAddress("sender@domain.be", "Van voorbeeld") Message.To.Add(New MailAddress("receiver@domain.be", "Naar voorbeeld")) Message.IsBodyHtml = False Message.Subject = "Nefsani 联系表" Message.Body = "电子邮件：" & Qemail.Text & Environment.NewLine & "电话：" & QTel.Text & Environment.NewLine & "问题：" & Qmessage.Text SmtpUser.UserName = "发件人@domain.be" SmtpUser.Password = "密码" Smtp.UseDefaultCredentials = False Smtp.Credentials = SmtpUser Smtp.Host = "smtp.mijnhostingpartner.nl" Smtp.DeliveryMethod = SmtpDeliveryMethod.Network Smtp.Send(消息) 结束子

aspx 文件中的代码

<div class="col-md-3 col-sm-6 footer-widget">
                    <h4>Contacteer mij</h4>
                    <ul>                      
                        <asp:TextBox ID="QFullname" class="form-control" placeholder="Naam + Voornaam" alt="Naam + Voornaam " runat="server"></asp:TextBox><br >
                        <asp:TextBox ID="QTel" class="form-control" placeholder="Telefoonnummer" alt="Telefoonnummer" runat="server"></asp:TextBox> <br >
                        <asp:TextBox ID="Qemail" class="form-control" placeholder="Email adres" alt="Email adres" runat="server"></asp:TextBox> <br >
                    </ul>
                </div>
            <div class="col-md-3 col-sm-6 footer-widget">
            <div class="contact-footer">
                <ul>
                    <asp:TextBox style="margin-top:52px" id="Qmessage" class="form-control" rows="4" TextMode="multiline" placeholder="Schrijf hier uw bericht." alt="Schrijf hier uw bericht." runat="server" />
                       <br><br/>
                    <asp:Button ID="btnSend" style="margin-top:-40px" class="btn btn-primary" runat="server" Text="Verzend" />
                    <asp:Label id="lblMessage" runat="server"></asp:Label>
                </ul>
           </div>`enter code here`
            </div>

Answer 1

您一无所获的原因是您的按钮未绑定到您的点击功能。您要么必须向按钮添加 onclick，要么必须向函数添加句柄事件。

  <asp:Button ID="btnSend" style="margin-top:-40px" class="btn btn-primary" runat="server" Text="Verzend" onclick="btnSend_Click" />

或

Protected Sub btnSend_Click(ByVal sender As Object, ByVal e As EventArgs) handles btnSend.Click

至于在点击处理程序底部显示消息：

lblMessage.Text = "a copy was sended to your email"