初学者请指教!谢谢!
我是在.aspx文件里将用户名,密码,确认密码,EMAIL条件都设置好了,然后通过button(id="AddBtn")
的AddBtn_Click()事件填加到user表里,可是实现不了,谁有好使的,谢谢!并有详细注解,

解决方案 »

  1.   

    Private Sub AddBtn_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles AddBtn.Click
            Dim myname as string = TextBox1.Text.Trim
            Dim mypass as string = TextBox2.Text.Trim
            conn = New SqlClient.SqlConnection("server=192.168.1.5;UID=hackate;PWD=123456;database=hackate")  ''连接数据库
            cmd = New SqlClient.SqlCommand("insert admin(admin_name,admin_pass) values(@admin_name,@admin_pass)", conn) ‘’填加语句,这里是填加一个用户名和密码。使用参数模式
            cmd.Parameters.Add("@admin_name", myname) ''参数用户名
            cmd.Parameters.Add("@admin_pass", mypass)   ''参数密码
            conn.Open()   ''打开数据库连接
            cmd.ExecuteNonQuery()   ''执行添加语句
            Response.Write("<script>alert('添加成功!');</script>")
            cmd.Dispose()   
            conn.Dispose()  ‘’关闭连接
        End Sub
      

  2.   

    没有用到try{}catch{}吗?那怎么判断表里是否有该用户呢?
      

  3.   

    try
    catch一般是用来捕获用户错误的
      

  4.   

    执行一条select跟一条insert语句就可以了
      

  5.   

    在.vb倒入
    Imports system.Data
    Imports system.Data.SqlClient'Sql Server
    Imports system.Data.Oledb'AccessPrivate Sub AddBtn_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles AddBtn.Click
            Dim myname as string = TextBox1.Text.Trim
            Dim mypass as string = TextBox2.Text.Trim
    Dim conn as new SqlConnection("server=localhost;UID=sa;PWD=sapwd;database=Your DataBase")  '连接SqlServer数据库
    Dim conn as new oledbconnection("Provider=Microsoft.Jet.Oledb.4.0;Data Source="& Server.MapPath)
    Dim cmd as New SqlCommand("insert admin(admin_name,admin_pass) values(@admin_name,@admin_pass)", conn) ‘’填加语句Sql Server,这里是填加一个用户名和密码。使用参数模式
    Dim cmd as new OledbCommand("Sql",conn)'Access
            cmd.Parameters.Add("@admin_name", myname) ''参数用户名
            cmd.Parameters.Add("@admin_pass", mypass)   ''参数密码
            conn.Open()   ''打开数据库连接
            cmd.ExecuteNonQuery()   ''执行添加语句
            Response.Write("<script>alert('添加成功!');</script>")
            cmd.Dispose()   
            conn.Dispose()  ‘’关闭连接
        End Sub
      

  6.   

    存储过程来实现就行了
    CREATE PROCEDURE insert_User

     @Username  [nvarchar](50),
              @PassWord         [nvarchar](50),
     @Email [nvarchar](50),
     @Ok   [int] out)ASdeclare @Ok_m int
    set @Ok_m=0
    select @Ok_m=count(PriceID) from [user] where username like @Username 
    if(@Ok_m =0)
    begin
     INSERT INTO [Price_Project].[dbo].[User] 
     ( [UserName],
     [Password],
     [Email])
     
    VALUES 
    ( @UserName,
     @Password,
     @Email
              )
     SET @Ok=1
    end 
    else
    set @Ok=0return @Ok  '@Ok为1时为成功,0时为失败
    GO