login form via mysql?

Status
Niet open voor verdere reacties.

timboiscool

Gebruiker
Lid geworden
27 nov 2008
Berichten
205
ja, de title zegt het ook al wel.
ik wil een login form maken op vb(2008) die het wachtwoord en de naam van mysql af haalt.
ik hoop dat jullie snel reageren alvast bedankt voor de gene die reageert:thumb:
 
ik heb het al XD

wil je de code hier is het:



Imports MySql.Data.MySqlClient
Imports System.Data



form1.load code:



Dim conn As MySqlConnection
'connect to DB
conn = New MySqlConnection()
conn.ConnectionString = "server=localhost; user id=myroot; password=mypwd; database=login"
'see if connection failed.
Try
conn.Open()
Catch myerror As MySqlException
MessageBox.Show("Error Connecting to Database: " & myerror.Message)
End Try





login button code:



'sql query
Dim myAdapter As New MySqlDataAdapter

Dim sqlquery = "SELECT username, password FROM userlist Where username='" & UsernameTextBox.Text & "' and password='" & PasswordTextBox.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 exits.
If myData.HasRows = 0 Then
MessageBox.Show("Invalid Login Details", "Login Error", MessageBoxButtons.OK, MessageBoxIcon.Error)
Else
Dim frm1 = New Form1
Frm1.Show()
Me.Visible = False
End If



last code:





Private Sub Form1_FormClosing(ByVal sender As Object, ByVal e As System.Windows.Forms.FormClosingEventArgs) Handles Me.FormClosing
LoginForm1.Visible = True
End Sub
 
Status
Niet open voor verdere reacties.

Nieuwste berichten

Terug
Bovenaan Onderaan