數據庫沒有更新1000

-1

嗨繼承人的代碼，它沒有任何錯誤，但是當你檢查數據庫沒有被添加數據庫沒有更新1000

Private Sub Button4_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Create_btn.Click 
    Call getConnect() 

    If New_Username.Text = "" And New_Password.Text = "" And New_Pass_Code.Text = "" Then 
     MsgBox("check the empty textbox or wrong Admin Password", MsgBoxStyle.Critical, "needed") 

    Else 
     con.Open() 

     sql = "INSERT into Accounts (Username, Password, Pass_Code) values('" _ 
               & New_Username.Text & "','" _ 
              & New_Password.Text & "' , '" _ 
              & New_Pass_Code.Text & "')" 

      Dim sqlcomd As New SqlClient.SqlCommand 
     sqlcomd.CommandText = sql 
     sqlcomd.Connection = con 
     sql = sqlcomd.ExecuteNonQuery 


      MsgBox("data saved") 
     con.Close() 

    End If

來源

2013-08-26 Kim Evangelista

雖然這不能回答你的問題，請谷歌參數化查詢。您會發現編寫查詢更容易，並且您的代碼不會受到SQL注入攻擊的攻擊。 –

用'sqlcomd.ExecuteNonQuery'更改'sql = sqlcomd.ExecuteNonQuery' ... – matzone

嘗試檢查您的連接字符串。數據可能會保存到另一個數據庫。

來源

2013-08-26 07:07:07 mhneri

數據庫沒有更新1000

回答

相關問題