Bonjour,

J'essaye en vain de creer un objet windows media player. Voici mon code:

Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
Private Sub LireEnreg(fic As String)
Dim Wmp As WindowsMediaPlayer
 
Set Wmp = CreateObject("WMPlayer.OCX.7")       '<<== ça bloque ici, j'obtiens Erreur*Automation, Erreur*non*spécifiée*:oops:
Wmp.URL = fic
Wmp.Controls.play
 
End Sub
Le reference wmp.dll est bien activée.
Je suis sous WIN7, Window Media Player 12, access 2010.

Pouvez-vous m'aider SVP? Je vous en remercie par avance.