Utilisation de la playlist intégré à windows media player 9 (wmp.dll)

Commenter

Contenu du snippet

Voila ce n'est pas vraiment une source complète mais des explications pour utiliser la playlist intégré dans Media Player 9.0. Une partie des instructions présentes ici on été trouvés dans une source de 1dennis que je remercie au passage pour son aide.

C'est rien de bien compliqué mais le développement que je viens de finir se servait de ces instructions et j'ai mis longtemp à les trouver donc si ca peut aider quelqu'un.

@+

Kepone

Source / Exemple : 


'Dans ce code MediaPlayer est le nom du controle Windows Media Player 9

'Déclarations
Dim NomPlayList As IWMPPlaylist

'Création de la playlist
 Set  NomPlayList = MediaPlayer.newPlaylist("NomDeVotrePlaylist", "")

'Mettre la Playlist par défaut
 MediaPlayer.currentPlaylist = NomPlayList

'Remplir la Playlist
'On stocke le chemin du fichier dans une variable
Set NomFichier = MediaPlayer.mediaCollection.Add(Chemin_&_Nom_Du_Fichier)

'On ajoute le fichier à la playlist
 MediaPlayer.currentPlaylist.appendItem (NomFichier)

'Lancer la lecture de la playlist
MediaPlayer.Controls.play

'Stopper la lecture
MediaPlayer.Controls.Stop

'Pour avancer / reculer / pause c'est pareil vous trouverez facilement

'Demander au lecteur de lire la playlist en boucle
MediaPlayer.settings.setMode "Loop", True

'Pour basculer en plein écran il faut s'assurer que le player est en mode lecture sinon sa plante. J'ai donc fait comme suit :
Do While MediaPlayer.playState <> wmppsPlaying
        DoEvents
Loop
MediaPlayer.fullScreen = True

A voir également

S'inscrire maintenant

Vous n'êtes pas encore membre ?

inscrivez-vous, c'est gratuit et ça prend moins d'une minute !

Les membres obtiennent plus de réponses que les utilisateurs anonymes.

Le fait d'être membre vous permet d'avoir un suivi détaillé de vos demandes et codes sources.

Le fait d'être membre vous permet d'avoir des options supplémentaires.

Du même auteur (Kepone)