Ok sorry about this guys, but no search function

[Jethro]

Sorry in advance, would have used search but has been disabled SO here is a question which has been asked a million times previously....our internal archive server is down so cannot log in to extract the code.........................

Playing wav files.

Am using

Const SND_SYNC = &H0
Const SND_NODEFAULT = &H2

Call sndPlaySound(sWavFile, SND_SYNC Or SND_NODEFAULT)

In a public sub.

Get the following error

"Sub or FUnction not defined"

Do l have to do the declare in the same bas module?

[csammis]

That, or wherever you do declare the API call, make it and the constants public. I'd post the code, but the one app I used it in is archived and my archive hard drive is currently failing hideously

[Megatron]

Private Declare Function PlaySound Lib "winmm.dll" Alias "PlaySoundA" (ByVal lpszName As String, ByVal hModule As Long, ByVal dwFlags As Long) As Long

Private Sub Command1_Click()
    
    PlaySound "MyFile.wav", 0, 1
    
End Sub

[lord_dude]

Public Declare Function sndPlaySound Lib "winmm.dll" Alias "sndPlaySoundA" (ByVal lpszSoundName As String, ByVal uFlags As Long) As Long

[Jethro]

Was again thanks guys.

Meg you are a live saver, am hour off giving a demo and the friggin API calls are not working. That's what ya get for coding on the bus on the way to a site l guess