Hi,
seit langer langer Zeit möchte ich mich mal wieder mit VB.net beschäftigen und bekomme die Datenbankverbindung zum MySQL Server nicht hin.
Was mache ich falsch?
*Topic ausgelagert*
seit langer langer Zeit möchte ich mich mal wieder mit VB.net beschäftigen und bekomme die Datenbankverbindung zum MySQL Server nicht hin.
VB.NET-Quellcode
- Imports MySql.Data.MySqlClient
- Public Class Login
- Private Sub BT_MySQLtest_Click(sender As Object, e As EventArgs) Handles BT_MySQLtest.Click
- Dim con As New MySqlConnection
- Dim cmd As New MySqlCommand
- Dim sqlConnString As String = "Server=rdbms.strato.de;Database=DB4711;Uid=U4711;Pwd=xyz;"
- Try
- Dim verbindung As String
- con.ConnectionString = sqlConnString
- con.Open()
- If con.State = ConnectionState.Open Then
- verbindung = "Verbindung OK!"
- Else
- verbindung = "Verbindung fehlgeschlagen!"
- End If
- con.Close()
- MsgBox(verbindung, MsgBoxStyle.Information, "INFO")
- Catch ex As Exception
- con.Close()
- MsgBox("Fehler beim verbinden der DB!", MsgBoxStyle.Critical, "!!! Fehler !!!")
- End Try
- End Sub
- End Class
Was mache ich falsch?
*Topic ausgelagert*
