Commande VB Shell

Fermé
geo trouve-tout Messages postés 352 Date d'inscription mardi 17 septembre 2013 Statut Membre Dernière intervention 9 août 2023 - 28 oct. 2013 à 21:45
geo trouve-tout Messages postés 352 Date d'inscription mardi 17 septembre 2013 Statut Membre Dernière intervention 9 août 2023 - 8 nov. 2013 à 20:10
Bonjour,

J'ai cette commande pour ouvrir, une musique, et la jouer avec sndrec32 , sans qu'on la voye. Elle ne fonctionne pas. Pouvez vous m'aider svp merci.

son = "C:\DancingQueen.wav"
set shl = createobject("wscript.shell")
shl.Run & "sndrec32/play /embedding/close" & son , 1,true

Que ce soit des " ou des () c'est pareil ca ne fonctionne pas, le meilleur que ca me fait quand je change 2-3 truc c'est de m'ouvrir sndrec32 et de m'ouvrir la fenetre d'importation... Merci d'avance
A voir également:

2 réponses

Réponse 1 / 2
michel_m Messages postés 16602 Date d'inscription lundi 12 septembre 2005 Statut Contributeur Dernière intervention 16 décembre 2023 3 313
29 oct. 2013 à 09:05
Bonjour,

Une autre manière d'écouter du .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

'------------------------
' archives MPFE
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 & "\" & "Tamusique.wav"
    Call PlaySound32(WAVFile, 0&, SND_SYNC Or SND_FILENAME)
Else
    Exit Sub
End If
End Sub
0
Réponse 2 / 2
geo trouve-tout Messages postés 352 Date d'inscription mardi 17 septembre 2013 Statut Membre Dernière intervention 9 août 2023 58
29 oct. 2013 à 17:52
Euh...Est-ce que je pourrais avoir la correction de mes lignes stp ?^^
merci
0
michel_m Messages postés 16602 Date d'inscription lundi 12 septembre 2005 Statut Contributeur Dernière intervention 16 décembre 2023 3 313
30 oct. 2013 à 09:10
Abandon
0
michel_m Messages postés 16602 Date d'inscription lundi 12 septembre 2005 Statut Contributeur Dernière intervention 16 décembre 2023 3 313
30 oct. 2013 à 10:32
Excuses moi d'avoir passé du temps bénévolement pour essayer de t'aider
0
geo trouve-tout Messages postés 352 Date d'inscription mardi 17 septembre 2013 Statut Membre Dernière intervention 9 août 2023 58
8 nov. 2013 à 20:10
Je demande simplement la correction de mes lignes, car les tiennes ne fonctionennt pas dans le cas ou je souhaite les utiliser
0

Discussions similaires

Pip n'est pas reconnu en tant que commande interne
Chris3874 -
Utilisateur anonyme -

22 réponses
Ma commande est en cours de validation sur Fnac
Ali -
Ali -

2 réponses