Stop Sound Now! (Resolved)

[Sacofjoea]

Im using the following, which I got here, to play sound:

Private Declare Function sndPlaySound Lib "winmm.dll" Alias "sndPlaySoundA" _
    (ByVal lpszSoundName As String, ByVal uFlags As Long) As Long
    
Private Const SND_ASYNC = &H1
Private Const SND_NODEFAULT = &H2
 
sndPlaySound "C:\Temp.wav", SND_ASYNC Or SND_NODEFAULT

my question is simple.. how do you stop the sound once it has started. Surprising that no one included this in many of the posts I have looked for here regarding this...

thanks
sac

[Buzby]

I think I read somewhere that you just run the same code again, but with no filename:

sndPlaySound "", SND_ASYNC Or SND_NODEFAULT

[Sacofjoea]

no luck with that

[si_the_geek]

I've just checked in the API guide, it says you need to set the first parameter to NULL, eg:

sndPlaySound vbNull, SND_ASYNC Or SND_NODEFAULT

[Sacofjoea]

hmm makes sense but isn't working, damn it

[sunnyl]

Setting the filename to null to stop the sound will only work if the sound is being looped, ie, with the SND_LOOP flag.

'start
sndPlaySound "C:\Temp.wav", SND_ASYNC Or SND_NODEFAULT Or SND_LOOP
 
'stop
sndPlaySound vbNullString, SND_ASYNC Or SND_NODEFAULT

[Sacofjoea]

ahh thanks - works