2011-03-05 71 views
0
Protected Sub ImageButton3_Click(ByVal sender As Object, ByVal e As System.Web.UI.ImageClickEventArgs) Handles ImageButton3.Click 
     If ImageButton3.ImageUrl = ("./images/back.png") Then 
      Me.Response.Redirect("http://www.volvobusesindia.com") 
     Else 
      Try 
       Dim SmtpServer As New SmtpClient() 
       Dim mail As New MailMessage() 
       SmtpServer.Credentials = New Net.NetworkCredential("[email protected]", "xxxxxx") 
       SmtpServer.Port = 25 
       SmtpServer.Host = "mail.volvobusesindia.com" 
       mail = New MailMessage() 
       mail.From = New MailAddress("[email protected]") 
       mail.To.Add(Literal23.Text) 
       mail.Subject = "VolvoBusesIndia:E-Ticket Confirmation" 
       mail.Body = "<B>" + "||| -- VOLVOBUSESINDIA : E-Ticket Confirmation -- |||" + "</B>" + "<BR><BR><BR>" + "<B>" + "PNR Number : " + "</B>" & " " & Literal2.Text + "<BR><BR>" + "<B>" + "Payment Reference Number : " + "</B>" & " " & Literal1.Text + "<BR><BR>" + "<B>" + "Ticket Number : " + "</B>" & " " & Literal3.Text + "<BR><BR>" + "<B>" + "Travels : " + "</B>" & " " & Literal4.Text + "<BR><BR>" + "<B>" + "From : " + "</B>" & " " & Literal7.Text + "<BR><BR>" + "<B>" + "To : " + "</B>" & " " & Literal8.Text + "<BR><BR>" + "<B>" + "Journey Date : " + "</B>" & " " & Literal10.Text + "<BR><BR>" + "<B>" + "Departure : " + "</B>" & " " & Literal11.Text + "<BR><BR>" + "<B>" + "Arrival : " + "</B>" & " " & Literal12.Text + "<BR><BR>" + "<B>" + "Boarding Point : " + "</B>" & " " & Literal13.Text + "<BR><BR>" + "<B>" + "Dropping Point : " + "</B>" & " " & Literal14.Text + "<BR><BR>" + "<B>" + "Seat Selected : " + "</B>" & " " & Literal15.Text + "<BR><BR>" + "<B>" + "Seat Opted : " + "</B>" & " " & Literal16.Text + "<BR><BR>" + "<B>" + "Bus Type : " + "</B>" & " " & Literal17.Text + "<BR><BR>" + "<B>" + "Total Amount : " + "</B>" & " " & Literal19.Text + "<BR><BR>" + "<B>" + "Payment Status : " + "</B>" & " " & Label1.Text + "<BR><BR>" + "<B>" + "Paid via : " + "</B>" & " " & Literal20.Text + "<BR><BR>" + "<B>" + "Message : " + "</B>" & " " + "<BR>" & "Volvo Buses India Wishes you a very Happy Journey, hope you satisfied with our services" 
       mail.IsBodyHtml = True 
       SmtpServer.Send(mail) 
      Catch ex As Exception 
       MsgBox(ex.ToString) 
      End Try 
      Try 
       Using conn = New SqlConnection(constr) 
        Using cmd = conn.CreateCommand() 
         conn.Open() 
         Dim sql As String = "UPDATE a1_ticket SET BANK = @bank, PAID = @paid, BID = @bid WHERE Ticket_no = @ticketNo" 
         cmd.CommandText = sql 
         cmd.Parameters.AddWithValue("@bank", Literal20.Text) 
         cmd.Parameters.AddWithValue("@paid", Label1.Text) 
         cmd.Parameters.AddWithValue("@bid", Literal21.Text) 
         cmd.Parameters.AddWithValue("@ticketNo", Literal3.Text) 
         cmd.ExecuteNonQuery() 
        End Using 
       End Using 
      Catch ex As Exception 
       Response.Write(ex.Message) 
      End Try 
      Response.Redirect("~/eticket.aspx?Pno=" & Literal2.Text & "&tid=" & Literal22.Text & "&Status=" & "Print_ticket_success") 
     End If 
    End Sub 

页找不到错误发生....但页面alredy上传...页找不到错误在ASP.NET

eticket.aspx和网站http://www.volvobusesindia.com

+2

在没有更多上下文的情况下飞溅一段代码不是一个提问的好方法。请解释代码的目的,预期结果和实际结果。 – Oded 2011-03-05 11:19:14

+0

@ user594849你可以给我们更多的信息??,它是一个编译问题?数据存取权限问题?数据可视化的问题?SQL语法? – Morvader 2011-03-05 11:22:45

+0

听起来就像他在使用页面时得到了404一样。只需对它进行一点一点的调试 - 除去SMTP和数据库更新的整个尝试块并查看它是否有效。如果它不是它可能是重定向的路径引用之一。如果它确实有效,就让代码重新加入。尽管如此,我的钱仍然在重定向到“〜/ eticket.aspx”。 – 2011-03-05 11:24:23

回答

0

检查网页

eticket.aspx 

存在于您的应用程序的根文件夹中。在线快速检查显示www.volvobusesindia.com的根目录中不存在eticket.aspx。

也许你的应用是在一个子文件夹?

0

http://www.volvobusesindia.com/eticket.aspx给了我404页未发现异常。你能再次检查这个页面的存在吗?

+0

雅页面可...的http://www.clixngo.com/eticket.aspx – user594849 2011-03-05 12:37:38

+0

@ user594849 - 这是不可用,甚至在您给我提供的新的链接。 – Pradeep 2011-03-06 11:46:21

1

检查网页是否使用什么控制,错误的部分是:

(或它的一个依赖)

这意味着,例如,如果你使用MyControl.ascx和这样的文件不存在,您将得到相同的404错误。

0

几点:

  1. 是您当前上下文clixngo.com或volvobusesindia。如果沃尔沃客车印度,那么我们就遭遇404

  2. 的Response.Redirect(〜/ ..)只能在当前域工作。对于其他域你必须指定整个字符串。