[Resolvido] login
boa tarde estou tentando fazer o login a baixo
mas se eu faço o login no banco que criei no visual stuido funciona
se tento usar minha base em mysql não funciona
qual é o erro?
obrigado
Imports System.Data.SqlClient
Public Class Form1
Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
Dim cn As New SqlConnection("Data Source=C:\Users\Hercules\Documents\Visual Studio 2010\Projects\sln_login\login\login_teste.sdf") 'banco criado no visual studio 2010
Dim cn As New SqlConnection("server=localhost;User Id=root;database=cisotos") 'meu banco mysql
Dim cmd As New SqlCommand(String.Format("select * from login_cisotos where login = '{0}' and senha = '{1}'", usuarioTextBox.Text, senhaTextBox.Text), cn)
cmd.CommandType = CommandType.Text
Try
cn.Open()
Dim dr As SqlDataReader = cmd.ExecuteReader()
If dr.Read() Then
Me.Close()
Form2.Show()
Else
MessageBox.Show("erro de login", "login error", MessageBoxButtons.OK, MessageBoxIcon.Warning)
End If
Catch ex As Exception
MessageBox.Show(ex.Message, "login error", MessageBoxButtons.OK, MessageBoxIcon.Warning)
Finally
If cn.State = ConnectionState.Open Then
cn.Close()
End If
End Try
End Sub
End ClassDiscussão (1)
Carregando comentários...