Dim myCon As New MySql.Data.MySqlClient.MySqlConnection(myConnectionString)
Dim myCom As New MySql.Data.MySqlClient.MySqlCommand(strSQL, myCon)
Dim myAdapter As New MySql.Data.MySqlClient.MySqlDataAdapter(myCom)
Dim myEpisoden As New DataTable("Episoden")
myAdapter.Fill(myEpisoden)
myCon.Close()
 
For Each dr As DataRow In myEpisoden.Rows
        schreibe  in Access per oledbconnection
next