Ich hab ein Problem mit dem Login, statt das nächste Menü zu öffnen bringt er mir immer wieder die Fehlermeldung der MsgBox
Edit by ErfinderDesRades: bitte richtiges UnterForum wählen
VB.NET-Quellcode
- Imports MySql.Data.MySqlClient
- Public Class Login Private Sub Login1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Login1.Click Dim cn As New MySqlConnection Dim cmd As New MySqlCommand Dim dr As MySqlDataReader
- cn.ConnectionString = "Server = 127.0.0.1; user id = root; password = 123456; database = network-ufp" cmd.Connection = cn cn.Open() cmd.CommandText = "SELECT username,password FROM wcf1_user WHERE username = '" & txtusername.Text & "' and password = '" & txtpassword.Text & "'" dr = cmd.ExecuteReader
- If dr.HasRows Then Hauptmenü.Show() Me.Visible = False Else MsgBox("Invalid Username or Password") End If
- End Sub
- Private Sub Button2_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Abbrechen1.Click Me.Close() End SubEndClass
Edit by ErfinderDesRades: bitte richtiges UnterForum wählen
Dieser Beitrag wurde bereits 1 mal editiert, zuletzt von „ErfinderDesRades“ ()