Login systeem

[AlecVanNoten]

Met Microsoft Visual Basic Express Edition 2005 is het mogelijk om een login-form te maken.
Maar wat is de code om - als je ingelogt bent - naar een ander Form te gaan?

Het login-form maakt verbinding met een Access DB met een aparte tabel voor username en password.
Het Login-Form heeft twee velden (username en password), een OK- en Cancelbutton.

Wat is de code aub?

Groetjes,
Alec

 

[timmy92]

ik ken Vb5 niet maar bij Vb6 doe je gewoon "naam van form".show en als je het andere form wilt laten verdwijnen me.hide of "naam van form.hide

 

[That Guy]

of, unload *formnaam*

 

[HellupUandMe]

bijv.

form2.Showdialog

 

[WILLIAMXXX]

misschein heb je hier wat aan:?

form2.top = me.left
form2.left = me.top
form2.show

if textbox1.text = "denaam" then
else
form2.close
Msgbox "Fout in de naam"
end if

if textbox2.text = "hetwachtwoord" then
else
form2.close
Msgbox "Fout in de wachtwoord"
end if

maak die code op een button

 

[Semafoor]

?

Wekt de bovengenoemde code??

Quote: Williamxxx

form2.top = me.left
form2.left = me.top
form2.show

if textbox1.text = "denaam" then
else
form2.close
Msgbox "Fout in de naam"
end if

if textbox2.text = "hetwachtwoord" then
else
form2.close
Msgbox "Fout in de wachtwoord"
end if

maak die code op een button

 

[That Guy]

Een kleine verandering van WILLIAM's code:
Maak een command button (command1) en 2 textboxjes
Form1 is het huidige form, form 2 is hetgeen dat je wilt laten zien als er ingelogd is.

Private sub Button1_click (.....) ....
if textbox1.text = "Username" and textbox2.text = "Wachtwoord" then
form2.show
unload me
else
msgbox "er zit een fout in de inloggegevens!
end if
end sub

 

[Semafoor]

Is het ook mogelijk om meerdere usernames toe te voegen??

Private sub Button1_click (.....) ....
if textbox1.text = "Username" and textbox2.text = "Wachtwoord" or if textbox1.text = "username2" and textbox2.text = "wachtwoord2" then
form2.show
unload me
else
msgbox "er zit een fout in de inloggegevens!
end if
end sub

Is dit hier boven goe? Zo ja zit er een maximum aan gebruikers aan? of kan je gewoon op deze manier doorgaan.. (ik weet dat het niet netjes gesschreven (zou geschreven zijn o.i.d...) is maar de vraag is alleen of het kan.. )

Ik krijg trouwens een melding dat unload not declared is ... (Is de code hierboven vb of vb.net?)

Groeten Stefan

 

[That Guy]

Nee, wat je dan moet doen is:

If text1.text = "username" and text2.text = "password" OR text1.text = "USERNAME2" and text2.text = "PASSWORD2" OR .... and ... OR ... and ... OR ... and ...

enz.
Unload(object as object) is voor vb6.0 en lager, voor .NET moet je bij William zijn.