Try
            Dim connString As String = "Database=messaging;Data" & _
              "Source=127.0.0.1;User Id=Administrator;Password=******"
            Dim cn As New ByteFX.Data.MySqlClient.MySqlConnection(connString)
            cn.Open()  'Das ist Zeile 94
            cn.Close()
            System.Windows.Forms.MessageBox.Show("Die Verbindung konnte" & _
              "erfolgreich hergestellt werden!")
        Catch ex As ByteFX.Data.MySqlClient.MySqlException
            System.Windows.Forms.MessageBox.Show(ex.ToString())
        End Try