Olá Amigo! Vi Que Voce Esta Loko Ne kk! Pega o Meu então Esta 100% VB.NET Login + Connecção Com MySQL não Esqueça De Inserir a Referencia MySQL.Data
e Depois Na Form Coloca
Imports MySql.Data.MySqlClient
Cria Uma Form e Comfigure o Codigo Com Seus Dados SQL E Depois Coloque Tudo O Codigo Abaixo Num "Button" E Pronto
Dim MySqlConnection As MySqlConnection
MySqlConnection = New MySqlConnection
MySqlConnection.ConnectionString = "server=db4free.net;Port=3306; user id=*******; password=*******; database=*******"
MySqlConnection.Open()
Dim Myadapter As New MySqlDataAdapter
Dim sqlquary = "SELECT * From Nome Da Sua DataBase' WHERE Usuario='" & TextBox1.Text & "'AND Senha='" & TextBox2.Text & "';"
Dim command As New MySqlCommand
command.Connection = MySqlConnection
command.CommandText = sqlquary
Myadapter.SelectCommand = command
Dim Mydata As MySqlDataReader
Mydata = command.ExecuteReader
If Mydata.HasRows = True Then
MsgBox("Connectado Com Sucesso!", MsgBoxStyle.OkOnly, "MySQL")
Else
MsgBox("Autenticação Não Aceita.", MsgBoxStyle.OkOnly, "MySQL")
End If
End Sub
