Lire son en arrière plan

Résolu
PetitMinou12 Messages postés 71 Date d'inscription   Statut Membre Dernière intervention   -  
PetitMinou12 Messages postés 71 Date d'inscription   Statut Membre Dernière intervention   -
Bonjour, je suis entrain de développer un petit programme pour faire peur à mes amis et j'aimerais lire un fichier audio sans que le lecteur apparaisse. J'ai trouvé cette ligne là :

CreateObject("Wscript.Shell").Run "wmplayer /play /close ""file_location""", 0, False

Je l'ai testé mais elle marche uniquement si je met le répertoire en entier c:\etc . Sachant que je souhaite envoyer le fichier à d'autre personne cela ne doit pas être un tel répertoire. J'aimerais lire le fichier audio ce trouvant dans le répertoire actuel. Merci d'avance.
A voir également:

2 réponses

Réponse 1 / 2
yg_be Messages postés 23541 Date d'inscription   Statut Contributeur Dernière intervention   Ambassadeur 1 583
 
bonjour, dans quel langage fais-tu ce programme?
que veux-tu dire par "répertoire actuel"? celui où se trouve le programme? si oui, et qu'il s'agit de vbs, tu peux utiliser 
Set WshShell = CreateObject("WScript.Shell")
repertoire = WshShell.CurrentDirectory
1
PetitMinou12 Messages postés 71 Date d'inscription   Statut Membre Dernière intervention   5
 
Bah enfait j'ai un dossier dedans j'ai tout mes fichier concernant le développement de ce programme. En gros dedans j'ai main.bat; music.mp3 et music.vbs

Donc je dois mettre sa comme code car sa sa marche pas pour moi : 


Set WshShell = CreateObject("WScript.Shell")
repertoire = WshShell.CurrentDirectory
CreateObject("Wscript.Shell").Run "wmplayer /play /close ""music.mp3""", 0, False
0
yg_be Messages postés 23541 Date d'inscription   Statut Contributeur Dernière intervention   1 583 > PetitMinou12 Messages postés 71 Date d'inscription   Statut Membre Dernière intervention  
 
peut-être: 
Set WshShell = CreateObject("WScript.Shell")
repertoire = WshShell.CurrentDirectory
CreateObject("Wscript.Shell").Run "wmplayer /play /close """ & repertoire & "\music.mp3""", 0, False
0
Réponse 2 / 2
PetitMinou12 Messages postés 71 Date d'inscription   Statut Membre Dernière intervention   5
 
parfait sa marche un grand merci à vous ^^
0

Discussions similaires

arriere plan
minangi -
Raymond PENTIER -

1 réponse