Respon.Redirect menggunakan vb.net

pemrograman


Halo semua,

Saya baru di vb.net, saya sedang mengerjakan satu proyek yang memiliki tiga modul seperti halaman beranda, halaman pendaftaran dan terakhir halaman hubungi kami menggunakan ASP.NET. Masalah saya adalah halaman hubungi kami yaitu, pengguna dapat mengisi rincian kontak yang saya buat di halaman hubungi kami. Setelah pengguna dapat mengisi formulir dan mengklik tombol untuk mengirimkan, dan kemudian muncul satu jendela popup seperti “terima kasih untuk menghubungi kami. kami akan segera menghubungi Anda kembali” (menggunakan skrip) temukan kode di bawah ini) dan saya harus mengetuk tombol ok agar pesan tersebut hilang. pertanyaan saya adalah ketika saya mengklik tombol ok, halaman tersebut harus menuju halaman beranda tetapi tidak masuk dalam kode saya. silakan cari tahu kode di bawah ini yang saya gunakan di halaman hubungi kami. tolong beri saya setetes solusi yang sangat membantu saya…

kode saya adalah:

VB
Protected Sub imgLogin_Click(ByVal sender As Object, ByVal e As System.EventArgs) Handles imgLogin.Click
        Dim resulttosend As String
        Dim subject As String = "  User Request:"
        Dim msgto As String = ConfigurationManager.AppSettings("contactus_email")
        Dim msgfrom As String = ConfigurationManager.AppSettings("SendMail_from")
        Dim msgcc As String = ""
        Dim msgbcc As String = ""
        Dim msgdesc As String
        msgdesc = "Hi Administrator,<br><br>" & _
                        "Name: " & Txtname.Text & "<br>" & _
                        "City: " & txtCompany.Text & "<br>" & _
                        "Tel: " & Txttelephone.Text & "<br>" & _
                        "Email: " & Txtemail.Text & "<br>" & _
                        "Additional Information: " & Txtinfo.Text & "<br>"


        Dim clsobj As clsCommon = New clsCommon

        resulttosend = clsobj.fnsendMail(msgfrom, msgto, msgcc, msgbcc, subject, msgdesc)

        If resulttosend = "" Then
            
            Response.Write("<script language='javascript'>alert('Thank you for contacting us. We will get back to you shortly');</script>")
Response.Redirect("Index.aspx")
            txtCompany.Text = ""
            Txtemail.Text = ""
            Txttelephone.Text = ""
            Txtinfo.Text = ""
        Else
            lblStatus.Text = resulttosend
           
            Trace.Warn("ibSend_Click", "exception occured sending mail-->" & resulttosend)
        End If
    End Sub

Solusi 1

Kode yang dijalankan di sini ada di sisi server. Response.Write Anda mengirimkan kode HTML JavaScript ke browser dan seluruh kode Anda di dalam metode imgLogin_Click dijalankan bahkan sebelum kotak peringatan ditampilkan di browser. Ini segera membawa perhatian saya pada masalah di sini:
Karena Response.Redirect menambahkan informasi ke header HTTP, hal ini biasanya menyebabkan kesalahan saat mencoba Mengarahkan Ulang Reponse ketika seseorang telah menulis ke aliran. Yang mungkin Anda inginkan adalah menempatkan beberapa kode setelah alert(“…”); panggilan yang akan membuat browser menavigasi ke Index.asp Anda jendela.lokasi.assign(url)[^].

Response.Write("<script language='javascript'>alert('Thank you for contacting us. We will get back to you shortly'); window.location.assign('http://you.domain.xx/path/Index.asp');</script>")

Salam,

— Manfred

コメント

タイトルとURLをコピーしました