prodevs我正在使用vb.net和mysql数据库,我想在我的数据库中插入值。示例:我的数据库中有值是admin11,但是当我插入另一个值admin11时,我得到一个错误,这是我的代码。顺便说一下,这两个方法在不同的类中。
'''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''
这是我的代码来检查用户名是否存在于数据库中。。。
public sub checkusernameifexist()
Dim con = New MySqlConnection
con.ConnectionString = "server=localhost;userid=root;password=alpine;port=3305;database=pos_db;pooling=false;SslMode=none"
con.Open()
Dim query As String = "SELECT Username FROM pos_db.tblusers WHERE BINARY Username=@Users"
Dim cmd As New MySqlCommand(query, con)
cmd.Parameters.AddWithValue("@Users", frmLogin.txtUser.Text)
Dim count As Integer = Convert.ToInt32(cmd.ExecuteScalar())
If count <> 0 Then
MessageBox.Show("Username is already taken. Please create a unique one!", "System", MessageBoxButtons.OK, MessageBoxIcon.Exclamation)
Return
Else
insertDataToTblUser.insertToLogin()
End If
con.Close()
con.Dispose()
End Sub
''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''
这是我在插入值中的代码。。。。。。
作为mysqlconnection的dim con
Public Sub insertToLogin()
con = New MySqlConnection
con.ConnectionString = "server=localhost;userid=root;password=alpine;port=3305;database=pos_db;pooling=false;SslMode=none"
con.Open()
Dim qry As String = "INSERT INTO tblUsers (Username,Password,Level) VALUES (@User,@Pass,@lvl)"
Dim cmd As New MySqlCommand(qry, con)
cmd.Parameters.AddWithValue("@User", frmLogin.txtUser.Text)
cmd.Parameters.AddWithValue("@Pass", frmLogin.txtPass.Text)
cmd.Parameters.AddWithValue("@lvl", frmLogin.cmbUserlevel.Text)
cmd.ExecuteNonQuery()
MessageBox.Show("Sign Up Successful", "System", MessageBoxButtons.OK, MessageBoxIcon.Information)
con.Close()
con.Dispose()
End Sub
请帮帮我谢谢。
2条答案
按热度按时间kt06eoxx1#
mysql保留字
更改查询:
2o7dmzc52#
感谢所有帮助我的人,这些解决了我的问题。