WindowsMediaPlayer vb6 probleme d index dans playlist

ORTIPIC Messages postés 41 Date d'inscription mercredi 26 février 2003 Statut Membre Dernière intervention 16 juillet 2007 - 18 août 2005 à 17:35
ORTIPIC Messages postés 41 Date d'inscription mercredi 26 février 2003 Statut Membre Dernière intervention 16 juillet 2007 - 20 août 2005 à 12:11
salut a tous

avec la version 10 de WindowsMediaPlayer (composant)

WindowsMediaPlayer1.Controls.currentItem.Name <---- recupere le nom du morceau selectionné

mais comment avoir sa position dans le playlist
du genre : va=WindowsMediaPlayer1.Controls.currentItem.ListIndex

pour par exemple
name= WindowsMediaPlayer1.currentPlaylist.Item(va).Name

merci de me partager l info j ai cherché mais ............................

merci a tous

2 réponses

michelxld Messages postés 402 Date d'inscription vendredi 6 août 2004 Statut Membre Dernière intervention 12 octobre 2008 32
19 août 2005 à 19:54
bonsoir

la methode que je te proposes n'est sans doute pas la mieux adaptée , mais tu peux tester cette macro pour retrouver l'index de la séquence sélectionnée dans la playlist

Dim Pl As IWMPPlaylist
Dim j As Integer, i As Integer
Dim Cible As String


Cible = WindowsMediaPlayer1.Controls.currentItem.Name


Set Pl = WindowsMediaPlayer1.currentPlaylist
j = Pl.Count
If Not j > 0 Then MsgBox "il n'y a pas d'éléments dans la playlist"

For i = 0 To j - 1
If Cible = Pl.Item(i).Name Then
MsgBox "L'index de la séquence " & Cible & " est : " & i
Exit For
End If
Next i

bon week end
michel
0
ORTIPIC Messages postés 41 Date d'inscription mercredi 26 février 2003 Statut Membre Dernière intervention 16 juillet 2007
20 août 2005 à 12:11
merci michel

il semble bien qu il n y ai que cette methode
helas sur 1000 morceaux ou +
ca vas ramer fort c la mrd............
0
Rejoignez-nous