Lancer la visualisation d'un fichier .avi (ou autre fichier vidéo) au clic de son nom

Bonjour à tous
J'ai une liste de fichiers vidéo sur un formulaire. Je peux (évidemment) colorer les noms en bleu et les souligner pour faire comprendre au lecteur qu'il peut voir le film en cliquant sur son nom.
Ma question est simplement : quel code mettre sous le clic ?
J'ai essayé "Shell" comme ci-dessous :

Code:

---

1 2 3

Private Sub ListeDesVideos_Click(sender As Object, e As EventArgs) Shell("C:\Users\pierr\Videos\NomDeFichier.avi") End Sub

---

Mais il ne se passe rien.
Quelqu'un a-t-il une idée pour résoudre mon problème ? :(

Salut

Il te manque le chemin et non du programme externe qui va jouer ton fichier.
Exemple à adapter

Code:

---

1 2 3

Private Sub ListeDesVideos_Click(sender As Object, e As EventArgs) Shell("lecteur:\emplacementdudossier\wmplayer.exe C:\Users\pierr\Videos\NomDeFichier.avi") End Sub

---

J'ai essayé avec ce code :

Code:

---

1 2 3

Private Sub ListeDesVideos_Click(sender As Object, e As EventArgs) Handles ListeDesVideos.Click Shell("C:\Program Files (x86)\Windows Media Player\wmplayer.exe D:\Documents\aVBProjects 2020\Dominique\bin\Debug\Fichier1.avi") End Sub

---

ça ne marche pas.
Je pense qu'il y a peut-être un problème d'espaces. Quoique le string est entre guillemets (??).

Peut-on m'éclairer ?

J'ai mis une copie du fichier 'wmplayer.exe' et une copie du fichier à lire à la racine d'un disque dur. Tout marche !
Merci !

Re

C'est peut être un problème de caractères espace dans le chemin de l’exécutable.

Code:

---

Shell("""C:\Program Files (x86)\Windows Media Player\wmplayer.exe"" ""D:\Documents\aVBProjects 2020\Dominique\bin\Debug\Fichier1.avi""")

---

en ajoutant des "" cela devrait le faire si tu veux utiliser le wmplayer.exe d'origine.