sql = "selectTop8 * FromMusicListwhere" & sql2 & "OrderByHitsDesc"
La sélection des huit premiers éléments n'est pas valide! ~
Toutes les nouvelles sont affichées! ~ Pourquoi?
Changez-le simplement en ce qui suit
sql = "selectTop8 * FromMusicListwhere" & sql2 & "OrderByhits, iddesc"
Notez que l'ID est automatiquement augmenté