Imports MySql.Data.MySqlClient
Public Class Form3
Public con As New MySqlConnection
Public cmd As New MySqlCommand
Public reader As MySqlDataReader

Public Sub Provider()
con.ConnectionString = "server=serverip;" & "user id=name;" & "password=pw;" & "database=datenbank"
cmd.Connection = con
End Sub
Private Sub Form3_Load(sender As System.Object, e As System.EventArgs) Handles MyBase.Load
Timer1.Start()
End Sub

Private Sub KryptonButton1_Click(sender As System.Object, e As System.EventArgs) Handles KryptonButton1.Click

End Sub

Private Sub Label1_Click(sender As System.Object, e As System.EventArgs) Handles Label1.Click, Label2.Click

End Sub

Private Sub Timer1_Tick(sender As System.Object, e As System.EventArgs) Handles Timer1.Tick
Try
con.Open()
cmd.CommandText = "SELECT * FROM benutzer"
reader = cmd.ExecuteReader
Do While reader.Read
Label2.Text = reader("Rang")
Loop
reader.Close()
con.Close()
Catch ex As Exception
con.Close()
MsgBox(ex.Message)
End Try
Timer1.Stop()
End Sub
End Class


So, jetzt hab ich das, stimmt auch alles mit den Namen usw.. aber es kommt die Fehler Meldung ausm Anhang.. Hilfe O.o

Dann nimm dem Try-Chatch weg und lass dir ne fehlermeldung ausgeben

Dann kommt bei Con.Open :
Unable to connect to any of the specified MySQL hosts.

Edit:
MysqlEdiction wurde nicht behandelt steht drüber..

Wie wers wenn du auch ein wenig eigeninitative zeigst ?? Die fehlermeldungen sagen genug um den fehler selbst zu beheben.

ja des hab ich, aber mir ist aufgefallen das nach dem Login keinen Namen hab den ich da suchen lass, wie kann ich des machen das es den namen noch aus dem Login übernimmt??

Textbox im Login wo der Name eingegeben wird auf das Label in Form2 verweise,

Label_Texte_Changed Event:

oke danke, jetzt kommt der nächste Fehler an dem ich seid einer halben Stunde ran hocke:

Code:



Fehler:
Die eingabe ist in falscher Zeichen Rheinfolge..

Hilfe O.o

Du kannst entweder den benutzer auslesen oder nur die ID. Beides geht soweit ich weiss nicht.

Also entweder so:


Oder so

nee kommt immer noch der Selbe Fehler, ich würde gerne nur das Label2.Text = aus der Datenbank der Rang von dem Eingeloggten benutzer ist ://

Mal ne frage am Rande. Hast du dich schonmal mit Datenbankprogrammierung befasst oder willst du einfach C&P haben ?

ne ich bin am lernen Aber ich hab den Fehler gefunden, war ein Rechtschreibfehler in der Verbindung -.- Danke ((:

Das hättest du schon vor 5 Wochen gefunden haben können denn ich hab dir in einem meiner Post's den ConectionString geschrieben wie er aussehen sollte

Mikeradtke schrieb:

oke danke, jetzt kommt der nächste Fehler an dem ich seid einer halben Stunde ran hocke:

Code:

Visual Basic Quellcode

1



cmd.CommandText = "SELECT * FROM benutzer WHERE Benutzername = '" & benutzer & "' where ID = 0"

das geht natürlich Aber nicht sowie du es geschrieben hast.



Man kann es auch mit OR verknüpfen, aber das ist jetzt die Fleißaufgabe für dich selbst den unterschied herrauszufinden ist nicht schwer.