Vraagje vb.net

[Shadowracer]

Hallo,

Ik zit nu in mijn 6de jaar informaticabeheer en moet in vb.net een programma schrijven als eindwerk. Nu moeten we met een login systeem werken en dit lukt me niet. Kan iemand me hierbij helpen? Ik werk met een database en een tabel tbllogin.

Grtz

[corien]

Ik hoop dat dit is wat je zoekt.
Het is wel php en mysql
KLIK HIER

[Acid]

Ik hoop dat dit is wat je zoekt.
Het is wel php en mysql
KLIK HIER

Php is heel wat anders dan vb.net ... corien ...

---------

En welk is het juist dat je niet kan of niet kan vinden met je login-systeem ?

Dit is vast de basis waar je vanuit moet gaan ...

Private Sub Ok_Click()
If Gebruikersnaam = "AdminNaam" And Wachtwoord = "AdminPass" Then
Me.Hide
Startvenster.Show
Else
Gebruikersnaam = ""
Wachtwoord = ""
MsgBox "Je login is fout !", vbCritical, "Error"
End If
End Sub

[Shadowracer]

Gewoon het volledige login systeem. De leraar is nu niet de beste en zelf weet ik niet echt hoe ik er aan moet beginnen.

[Shadowracer]

Private Sub Ok_Click()
If Gebruikersnaam = "AdminNaam" And Wachtwoord = "AdminPass" Then
Me.Hide
Startvenster.Show
Else
Gebruikersnaam = ""
Wachtwoord = ""
MsgBox "Je login is fout !", vbCritical, "Error"
End If
End Sub

Nee want mijn logindata zit in een database dus moet alles opgehaald worden.

[Acid]

Ja dat begrijp ik ... dus is dat waar je vastloopt ? ... dat vroeg ik net, vanwaar kan je niet verder ...

Btw heb snel even een .exe gedaan van een simpel loginsysteem , met basis van bovenstaande code (weliswaar zonder database)

[Shadowracer]

Bedankt, maar hoe moet ik dit nu doen met een database?

[Acid]

Allereerst moet je het systeem voorbereiden om dus bv. met een recordset namen en paswoorden aan te maken. Zodat je ze in de database kan zetten.

Daarna doe je net hetzelfde ...

Aleen zal de AdminNaam en Pass in de database moeten worden gecontroleerd. Voor dergelijke code kan je best even op Msdn kijken. Want met welke VB werk je ?

[Shadowracer]

2005 excpress

Kun je eens voorbeeld geven fzo?

THX!

[Acid]

Geen probleem ...

Het is dus de bedoeling dat je de juiste gegevens uit je database haalt om ze daarna te controleren ...

Hier weer de basis (ADO, Database, sql kennis vereist)

    Dim con As New OleDbConnection("Provider=Microsoft.jet.oledb.4.0;data source=E:\VBproject\myDB.mdb")
       Dim cmd As OleDbCommand = New OleDbCommand("SELECT * FROM Users WHERE username = '" & txtUser.Text & "' AND password = '" & txtPass.Text & "' ", con)
     con.Open()
      Dim sdr As OleDbDataReader = cmd.ExecuteReader()
       If (sdr.Read() = True) Then
            admin = sdr("isAdmin")
            MessageBox.Show("The user is Administrator!")
            'Pass verification and go to managemant form.
            Dim mainForm As MainForm = New MainForm()
            mainForm.Show()
           Me.Hide()
        Else
           MessageBox.Show("Invalid username or password!")
      End If