Har hittat följade kod och den fungerar (fick ladda ner något från mysql.com och sen lägga till det i mitt projekt så gick det)

Try
                Dim connStr As String
                connStr = "server='localhost';user id='root'; password='password'; database='databasen'; pooling=false"

                Dim conn As MySqlConnection = New MySqlConnection(connStr)
                conn.Open()


                Dim da As MySqlDataAdapter = New MySqlDataAdapter("SELECT * FROM tabellen", conn)


            Catch ex As Exception
                MessageBox.Show(ex.Message)
            End Try

Hjälp någon? :(