Hallo VB-Paradise User,
ich möchte eine Verbindung zur einer Datenbank von bplaced herstellen wo er die Daten abgleicht also mit dem Benutzername und dem Passwort wen das richtig ist dann wird Form1 sichtbar.
Nur kommt halt eine Fehlermeldung bei myData = myCommand.ExecuteReader
Ich hoffe ihr könnt mir helfen danke im voraus
Gruß MarvinMario
Edit by Dodo:
1. Falsches Unterforum, 2. die Farbe rot ist den Admins & Mods vorbehalten
-> Topic verschoben (Hauptforum => Datenbankprogrammierung)
-> Farbe rot entfernt
ich möchte eine Verbindung zur einer Datenbank von bplaced herstellen wo er die Daten abgleicht also mit dem Benutzername und dem Passwort wen das richtig ist dann wird Form1 sichtbar.
Nur kommt halt eine Fehlermeldung bei myData = myCommand.ExecuteReader
Ich hoffe ihr könnt mir helfen danke im voraus
Gruß MarvinMario
VB.NET-Quellcode
- Imports MySql.Data.MySqlClient
- Imports System.Data
- Public Class Login
- Dim Mysqlconnection As MySqlConnection
- Private Sub OK_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles OK.Click
- Dim conn As MySqlConnection
- conn = New MySqlConnection
- conn.ConnectionString = "server= localhost; user id= hacksandblabla; password= blablabla; database= hacksandblaba"
- Try
- conn.Open()
- Catch ex As Exception
- MsgBox("Konnte")
- End Try
- Dim myAdapter As New MySqlDataAdapter
- Dim sqlquery = "Select * FROM Test Where Name='" & UsernameTextBox.Text & "'and Password='" & PasswordTextBox.Text & "'"
- Dim myCommand As New MySqlCommand
- myCommand.Connection = conn
- myCommand.CommandText = sqlquery
- myAdapter.SelectCommand = myCommand
- Dim myData As MySqlDataReader
- myData = myCommand.ExecuteReader
- If myData.HasRows = 0 Then
- MsgBox("Falsch")
- Else
- Dim Form1 = New Form1
- Form1.Show()
- Me.Visible = False
- End If
- End Sub
- Private Sub Cancel_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Cancel.Click
- Me.Close()
- End Sub
- Private Sub Login_Load(sender As System.Object, e As System.EventArgs) Handles MyBase.Load
- End Sub
- End Class
Edit by Dodo:
1. Falsches Unterforum, 2. die Farbe rot ist den Admins & Mods vorbehalten
-> Topic verschoben (Hauptforum => Datenbankprogrammierung)
-> Farbe rot entfernt
Dieser Beitrag wurde bereits 1 mal editiert, zuletzt von „Dodo“ ()