[VB6] Login mit passwort und username?

[Helix]

Hallo,

ich bin gerade am vb6 lernen und habe nun eine frage. Da ich nun schon weiß wie man anhand einer if anweisung einen passwortschutz erstellt nämlich so:

Dim passwort As String
passwort = txt_eingabe_passwort.Text

    If passwort = "test" Then
    lbl_ausgabe.Caption = "Login erfolgreich"
    Else
    lbl_ausgabe.Caption = "Login fehlerhaft"
    End If

wollte ich einmal fragen wie ich ein login mit username UND passwort hinbekomme.

Dim passwort As String
passwort = txt_eingabe_passwort.Text

Dim username As String
username = txt_eingabe_username.Text

    If passwort = "test"
    If username = "test" Then
    lbl_ausgabe.Caption = "Login erfolgreich"
    Else
    lbl_ausgabe.Caption = "Login fehlerhaft"
    End If

funktioniert schonmal nicht

bitte um antwort!
mfg Helix

[-=Player=-]

nicht getestet

Dim passwort As String
passwort = txt_eingabe_passwort.Text

Dim username As String
username = txt_eingabe_username.Text

    If passwort = "test" AND username = "test" Then
    lbl_ausgabe.Caption = "Login erfolgreich"
    Else
    lbl_ausgabe.Caption = "Login fehlerhaft"
    End If

[Helix]

funktioniert wunderbar und danke für die schnelle antwort

[l0dsb]

Tut euch selbst einen Gefallen und vergleicht die Checksummen und nicht den Plaintext.

[Epiphone]

If Username = "blub" then
lbl.label = "richtig"
else
lbl.label = "falsch"
exit sub
if Passwortt = "blub" then
lblpw.label = "richtig"
else
lblpw.label = "falsch"
end if

so in der art

edit: jo player seine methode is besser!

[Sawyer]

also bei nem Passwort und Username login , würde ich die if Anweisungen nicht benutzen

sondern auf select Case zurückgreifen , ist einfach logischer in diesem Fall

MfG

[YannicK]

Tut euch selbst einen Gefallen und vergleicht die Checksummen und nicht den Plaintext.

Begründung? ;p

[Sawyer]

Ich würde mal ganz spontan sagen , damit man das Passwort nicht ermitteln kann :?

MfG

[l0dsb]

Begründung: Man bräuchte wohl nicht mal einen Debugger/Disassembler, sondern könnte das Passwort sogar mit Notepad auslesen... Was denkst du wohl, warum Forensoftware als Webanwendung die Passwörter nicht auch im Plaintext speichert? Weil man nicht dran kommt?

[sp33dwalker]

gibts da unterschiede mit select case und if? mit select case müsste es ja so aussehen:

select case text1.text

case "password"
msgbox "login erfolgreich!"
end select

aber kann man das nit auslesen?