当前位置:编程学习 > C#/ASP.NET >>

VB里面注册按钮的代码

 Private Sub Button2_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button2.Click
        Dim conn As New SqlConnection
        Dim cmd As New SqlCommand
        conn.ConnectionString = "Data Source=localhost;Integrated Security=SSPI;Initial Catalog=Booking;Packet Size=4096;User Id=sa;password=''"
        If T_name.Text.Length < 1 Or True_name.Text.Length < 1 Or T_pwd.Text.Length < 1 Then
            Label3.Visible = True
        Else
            conn.Open()
            cmd.Connection = conn
            cmd.CommandText = "Insert into Teacher_information values(@T_name,@True_name,@T_pwd,@T_mail,@T_phone)"
            cmd.Parameters.Add(New SqlParameter("@T_name", SqlDbType.VarChar, 10))
            cmd.Parameters("@T_name").Value = Convert.ToString(Request("T_name"))
            cmd.Parameters.Add(New SqlParameter("@True_name", SqlDbType.VarChar, 6))
            cmd.Parameters("@True_name").Value = Convert.ToString(Request("True_name"))
            cmd.Parameters.Add(New SqlParameter("@T_pwd", SqlDbType.VarChar, 15))
            cmd.Parameters("@T_pwd").Value = Convert.ToString(Request("T_pwd"))
            cmd.Parameters.Add(New SqlParameter("@T_mail", SqlDbType.VarChar, 15))
            cmd.Parameters("@T_mail").Value = Convert.ToString(Request("T_mail"))
            cmd.Parameters.Add(New SqlParameter("@T_phone", SqlDbType.Char, 10))
            cmd.Parameters("@T_phone").Value = Convert.ToString(Request("T_phone"))
            cmd.ExecuteNonQuery()
            conn.Close()
            Label4.Text = "你已经注册成功"
            fh.Visible = True

        End If
    End Sub
这段代码哪里错了,我运行的时候,他自动跳转到admin.aspx页面,而我要的是registerteacher.aspx页面,新手求照顾啊 --------------------编程问答-------------------- 除 --------------------编程问答-------------------- 这里边没有关于 页面跳转的代码 --------------------编程问答-------------------- 有的额。我还有一个页面也是这样写的都可以,但是就是这个不行,它跳转不到本页面
补充:.NET技术 ,  VB.NET
CopyRight © 2012 站长网 编程知识问答 www.zzzyk.com All Rights Reserved
部份技术文章来自网络,