Ouvrir une chanson dans windows media player via Visual Basic
cs_emocore
Messages postés2Date d'inscriptionvendredi 18 juillet 2008StatutMembreDernière intervention 4 janvier 2010
-
4 janv. 2010 à 18:36
PCPT
Messages postés13272Date d'inscriptionlundi 13 décembre 2004StatutMembreDernière intervention 3 février 2018
-
5 janv. 2010 à 20:35
Bonjour,
Je viens tout juste de créer un programme qui lit les fichiers audios. Quand je clique sur du text exemple: THE HAND THAT FEEDS - NINE INCH NAILS, windows media doit ouvrir avec le fichier qui est dans le répertoire de mon programme. Je voudrais avoir un genre de curdir dans mon code, mais ça ne marche pas... Voici le code:
Private Sub Label4_Click()
Dim chanson
chanson = Shell("C:\Program Files\Windows Media Player\wmplayer.exe" & (App.Path + "\portrait\02.mp3"))
PCPT
Messages postés13272Date d'inscriptionlundi 13 décembre 2004StatutMembreDernière intervention 3 février 201847 4 janv. 2010 à 20:50
salut,
Dim chanson
chanson = Shell("C:\Program Files\Windows Media Player\wmplayer.exe" & (App.Path + "\portrait\02.mp3"))
1) chanson non typée
2) chanson reçoit une valeur non exploitée, elle sert à quoi?
3) shell sur un chemin non vérifié (en dur) qui peut ne pas exister
4) "non long" su chemin, alors que SHELL attend 90% du temps un nom court
5) manque un espace entre le prog et le chemin
6) le "+" sert à additionner, pas à concaténer
7) l'expression à concaténer (avec le & existant) est entre parenthèses, gros risques que çà soit une expression évaluée (true false sur une chaine?). elle n'a pas à être entre parenthèses
5 belles erreurs cumulées sur une unique ligne de code, j'vois pas ce qui peut bloquer :)
mais pour répondre à ta question, CURDIR existe, mais APP.PATH correspond parfaitement
tovin
Messages postés164Date d'inscriptionsamedi 11 décembre 2004StatutMembreDernière intervention14 août 20133 5 janv. 2010 à 18:33
Bonjour,
Et pourquoi pas :
Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
System.Diagnostics.Process.Start("C:\Documents and Settings\RAYMOND\Mes documents\Ma musique\flourish.mid")