Usamos cookies para medir audiência e melhorar sua experiência. Você pode aceitar ou recusar a qualquer momento. Veja sobre o iMasters.
Fiz uma pequena Login Form baseado em um vídeo do YouTube, mas quero complementá-la.
Queria depois que checado o usuário e ele for válido, checar uma coluna, e se o resultado dessa coluna for maior que 1 ele aceita, se não, ele dá um erro..
Dim conn As MySqlConnection
'connect to DB
conn = New MySqlConnection()
conn.ConnectionString = "server=108.170.59.190; user id=root; password=123mudar; database=proxy"
'see if connection failed
Try
conn.Open()
Catch myerror As MySqlException
MsgBox("Error connecting to database")
End Try
'sql query
Dim myAdapter As New MySqlDataAdapter
Dim sqlquery = "SELECT * FROM login WHERE username = '" + txtEmail.Text + "' AND password = '" + txtSenha.Text + "'"
Dim myCommand As New MysqlCommand()
myCommand.Connection = conn
myCommand.CommandText = sqlquery
'start query
myAdapter.SelectCommand = myCommand
Dim myData As MySqlDataReader
myData = myCommand.ExecuteReader()
'see if user exists
If myData.HasRows = 0 Then
MsgBox("Invalid Login!")
Else
MsgBox("Login Accepted!")
Form1.Show()
Me.Hide()
End IfCarregando comentários...