Is there?
Printable View
Is there?
Try the PlaySound Win API function (winmm.dll) << I think that was the name.
The API Viewer probably has the declaration for that call.
Hope that helps.Code:Declare Function sndPlaySound Lib "winmm.dll" Alias "sndPlaySoundA" (ByVal lpszSoundName As String, ByVal uFlags As Long) As Long
Global Const SND_ASYNC = &H1
Global Const SND_NODEFAULT = &H2
Sub Playwav(file)
SoundName$ = file
wFlags% = SND_ASYNC Or SND_NODEFAULT
X% = sndPlaySound(SoundName$, wFlags%): NoFreeze% = DoEvents()
End Sub
Usage:
Call Playwav("C:\opera.wav")
you can also stop a wav:
Call Playwav(" ")
[Edited by Matthew Gates on 07-17-2000 at 01:57 AM]