yannd0307
Messages postés22Date d'inscriptiondimanche 18 septembre 2005StatutMembreDernière intervention 7 novembre 2007 22 oct. 2006 à 16:06
Dans l'exemple que je fournit ci-après, je pars d'une liste dans laquelle est contenue le chemin des mp3 et dans une autre liste les mp3 (les indices des deux listes correspondent). ensuite je crée une playlist de la manière suivante :
Dim i As Integer
Dim Xwmp As IWMPMedia 'Définition de l'objet WMP
WindowsMediaPlayer1.currentPlaylist.Clear ' efface la playlist potentiellement délà chargée
For i = 0 To List1.ListCount - 1 ' boucle qui itère le nombre d'occurences de ma liste de mp3
Set Xwmp = WindowsMediaPlayer1.newMedia(List3.List( i ) & "" & List1.List( i ) ) ' list3( i ) -> chemin du mp3 à l'indice i; 'list1 ( i )-> mp3 à l'indice i
WindowsMediaPlayer1.currentPlaylist.insertItem i, Xwmp ' place le mp3 dans la playlist en cours
Next i
WindowsMediaPlayer1.Controls.play 'lit la playlist qui vient d'être créée
Voila j'espère que ce bout de code aura répondu à ta question.