Lancer une musique

narco4 Messages postés 32 Date d'inscription samedi 23 février 2008 Statut Membre Dernière intervention 23 août 2009 - 27 nov. 2008 à 14:36
narco4 Messages postés 32 Date d'inscription samedi 23 février 2008 Statut Membre Dernière intervention 23 août 2009 - 17 avril 2009 à 13:00
Bonjour,
je voudrais lancer une chanson.mp3 avec un script vbs
c'est assez simple ça,  mais je voudrais la lancer sans ouverture de lecteur et sans a avoir cliquer sur play donc.
Vous avez une idée?
Merci .

5 réponses

PCPT Messages postés 13280 Date d'inscription lundi 13 décembre 2004 Statut Membre Dernière intervention 3 février 2018 48
27 nov. 2008 à 20:52
salut,

lancer au final une musique dans manip et sans player..., difficilement réalisable
pour ne pas dire impossible (en VBS) mais le coeur y est....

<hr size="2" width="100%" />
Prenez un instant pour répondre à [sujet-SONDAGE-POP3-POUR-CS_769706.aspx ce sondage] svp 
0
narco4 Messages postés 32 Date d'inscription samedi 23 février 2008 Statut Membre Dernière intervention 23 août 2009
29 nov. 2008 à 23:54
merci, impossible meme son wav ou autre?
meme si le lecteur reste ds la barre des taches
0
cs_JMO Messages postés 1854 Date d'inscription jeudi 23 mai 2002 Statut Membre Dernière intervention 24 juin 2018 27
4 déc. 2008 à 09:58
 Bonjour,

Peut-être en essayant:

Dim WshShell, MyFile
MyFile = "d:\DEVO\Mongoloid.mp3"
Set WshShell = WScript.CreateObject("WScript.Shell")
WshShell.Run MyFile, 1

jean-marc
0
narco4 Messages postés 32 Date d'inscription samedi 23 février 2008 Statut Membre Dernière intervention 23 août 2009
16 avril 2009 à 01:05
Bonsoir JMO,

le lecteur s'ouvre en grand et il faut cliquer sur play
0

Vous n’avez pas trouvé la réponse que vous recherchez ?

Posez votre question
narco4 Messages postés 32 Date d'inscription samedi 23 février 2008 Statut Membre Dernière intervention 23 août 2009
17 avril 2009 à 13:00
<ol>
<li>Bonjour,

personne n'as une idée

j'ai ce script qui marche impec sous XP

Option explicit
Dim stFicSon,WshShell
stFicSon = "Termine.Wav"
Set WshShell = WScript.CreateObject("WScript.Shell")
WshShell.Run "sndrec32  /play /embedding /close " & stFicSon , 1, true

Mais sous Vista non sndrec32 n'est pas present sous Vista

</li>
</ol>
0
Rejoignez-nous