Lire fichier audio depuis les resources

DarkNight5047 Messages postés 20 Date d'inscription   Statut Membre Dernière intervention   -  
DarkNight5047 Messages postés 20 Date d'inscription   Statut Membre Dernière intervention   -
Bonjour, j'aimerai lire un fichier .wav qui se situe dans mes ressources. Le problème c'est que je veux en lire plusieurs en même temps et je ne peut donc pas utiliser My.Computer.Audio.Play(). Je sais que je devrai surement utiliser wmp mais je voie pas comment. Merci de m'aider
A voir également:

2 réponses

Réponse 1 / 2
michel_m Messages postés 16602 Date d'inscription   Statut Contributeur Dernière intervention   3 314
 
Bonjour,
Jouer plusieurs wav en m^me temps ???
ressources ??? ques aco ?

pour jouer un wav 
Private Declare Function PlaySound32 Lib "winmm.dll" Alias "PlaySoundA" (ByVal IpszName As String, ByVal hModule As Long, ByVal dwFlags As Long) As Long

Const SND_SYNC = &H0
Const SND_ASYNC = &H1
Const SND_FILENAME = &H20000

Sub PlayWAV()
' snd_async: son asynchrone (la musique n'arrete pas le programme) snd_sync: arrete le prog
If Application.CanPlaySounds Then
    WAVFile = ThisWorkbook.Path & "\" & "215.wav"
    Call PlaySound32(WAVFile, 0&, SND_SYNC Or SND_FILENAME)
Else
    Exit Sub
End If
End Sub


si tu veux jouer plusieurs morceaux à la suite 
For cptr=1 to N
music=choose(cptr,"music1","music2"......"musicN")
sub playwav(music)
If Application.CanPlaySounds Then
    WAVFile = ThisWorkbook.Path & "\" & music & ".wav"
etc
end if
next


Michel
0
DarkNight5047 Messages postés 20 Date d'inscription   Statut Membre Dernière intervention  
 
ça ne répond pas a mon probleme car j'ai besoin d'en jouer plusieurs en même temps et depuis mes ressources. Cela dit merci quand même :D
0
Réponse 2 / 2
DarkNight5047 Messages postés 20 Date d'inscription   Statut Membre Dernière intervention  
 
Up :p
0