Login::Fehler per Abfrage

  • VB.NET

Es gibt 5 Antworten in diesem Thema. Der letzte Beitrag () ist von nitram0598.

    Login::Fehler per Abfrage

    hallo liebes forum, ich möchte mit meinem programm einen login machen, klappt auch alles , auch dass es nur weiter geht wenn der name und das passwort richtig eingegeben wurde, aber jetzt meine frage:

    wie kann ich es machen, dass wenn der name und/oder dass passwort falsch sind, eine messagebox kommt, hier mal mein code, mit dem die msgbox nicht kommt:

    VB.NET-Quellcode

    1. Try
    2. con.Open()
    4. reader = cmd.ExecuteReader()
    5. Do While reader.Read()
    6. If reader("Name") = tb_log_name.Text And reader("Passwort") = tb_log_pass.Text Then
    7. eingeloggt()
    8. ElseIf reader("Name") = Not tb_log_name.Text And reader("Passwort") = Not tb_log_pass.Text Then
    9. MsgBox("Falscher Benutzername oder falsches Passowrt!", MsgBoxStyle.OkOnly, "Login :: Fehler")
    10. End If
    11. Loop
    12. reader.Close()
    13. con.Close()
    14. Catch ex As Exception
    15. MsgBox(ex.Message)
    16. End Try


    mfg nitram0598

    Hi,
    so vielleicht.

    VB.NET-Quellcode

    1. Try
    2. con.Open()
    3. Dim Fehler as Boolean = True
    4. reader = cmd.ExecuteReader()
    5. Do While reader.Read()
    6. If reader("Name") = tb_log_name.Text And reader("Passwort") = tb_log_pass.Text Then
    7. Fehler=False
    8. Exit Loop
    9. End If
    10. Loop
    11. reader.Close()
    12. con.Close()
    13. If Fehler = True Then
    14. MsgBox("Falscher Benutzername oder falsches Passowrt!", MsgBoxStyle.OkOnly, "Login :: Fehler")
    15. Else
    16. eingeloggt()
    17. End If
    19. Catch ex As Exception
    20. MsgBox(ex.Message)
    21. End Try

    Dieser Beitrag wurde bereits 1 mal editiert, zuletzt von „HerrFrie“ ()

    mach das grad schon mit der Abfrage

    VB.NET-Quellcode

    1. con.open()
    2. cmd.commmandText = "SELECT COUNT(*) FROM tabelle where Name = 'Hans' AND Passwort = '12345'"
    3. if CInt(cmd.ExecuteScalar()) = 1 then
    4. MessageBox.show("Erfolgreich eingeloggt")
    5. else
    6. MessageBox.show("Falsche Daten")
    7. end if
    8. con.close

    danke, hat geklappt, ich habe mal noch eine frage, ich habe einen wert in der mysql db: gold
    ich möchte die anzahl ändern, jedoch, es soll angegeben werden von wem es geändert werden soll (email)
    hier mein code, mit dem es nicht klappt:

    VB.NET-Quellcode

    1. cmd.CommandText = "UPDATE Users WHERE EMail='" & tb_del_mail.Text & "' SET Gold='" & tb_gold.Text & "'"