2013-06-13 29 views
1

請幫我一下發送兩個郵件的背靠背使用sendmail函數....單擊一下?

我正在使用sendMail函數發送郵件。點擊按鈕,我正在發送郵件。但相反,它是發送兩個郵件的背靠背一次點擊,我沒有找到任何理由,所以請幫助,如果有人知道這個問題,任何幫助表示讚賞,謝謝....

以下是我的VB代碼Sendmail的....

Protected Sub btnsend_Click(ByVal sender As Object, ByVal e As System.EventArgs) _ 
    Handles btnsend.Click 

    'Response.Write("<Script> alert('" & Request.QueryString("id").ToString() & "');</Script>") 
    Dim str_smtpserver As String = DotNetNuke.Entities.Host.HostSettings.GetHostSetting("SMTPServer") 
    Dim str_auth As String = DotNetNuke.Entities.Host.HostSettings.GetHostSetting("SMTPAuthentication") 
    Dim str_uname As String = DotNetNuke.Entities.Host.HostSettings.GetHostSetting("SMTPUsername") 
    Dim str_pass As String = DotNetNuke.Entities.Host.HostSettings.GetHostSetting("SMTPPassword") 

    Dim str_sub As String = "Message " 

    Dim tobody As String 

    Dim value As String = Request.QueryString("id").ToString() 

    Dim ds_staff = New DataSet() 

    ds_staff = DotNetNuke.Data.DataProvider.Instance().ExecuteDataSet("GetToEmailFromDB", value) 
    tobody = "<table border='1px'>" 

    tobody += "<tr><td style='width:90px;'>Name :</td><td>" & txtname.Text & "</td></tr>" 
    tobody += "<tr><td style='width:90px;'>Email :</td><td>" & txtemail.Text & "</td></tr>" 
    tobody += "<tr><td style='width:120px;'>Message :</td><td>" & txtmessage.Text & "</td></tr>" 

    tobody += "</table>" 

    fromid = "[email protected]" 
    Dim rVal As String = DotNetNuke.Services.Mail.Mail.SendMail(fromid, ds_staff.Tables(0).Rows(0)("email").ToString(), "", "", DotNetNuke.Services.Mail.MailPriority.Normal, str_sub, DotNetNuke.Services.Mail.MailFormat.Html, System.Text.Encoding.UTF8, tobody, "", str_smtpserver, str_auth, str_uname, str_pass) 
    If (rVal = "") Then 
     Page.ClientScript.RegisterStartupScript(Page.GetType(), "err_msg", "alert('Your message has been sent.');", True) 
    Else 
     Page.ClientScript.RegisterStartupScript(Page.GetType(), "err_msg", "alert('Invalid Email ID.');", True) 
    End If 

    Response.Redirect("home.aspx", True) 
End Sub 
+0

你有沒有看過[按鈕點擊事件處理程序發射兩次](http://forums.asp.net/t/1056418.aspx/1)? –

回答

0

事件處理程序是最有可能附着數次以按鈕的點擊事件。

也許你一次在aspx文件中,一次在代碼背後(OnInit?)文件中。

相關問題