ADDING A WAV SOUND TO A BUTTON

[csegal]

I would like to play a wav file when a button is pressed. is this possible using access 97?

csegal
csegal@arrowair.com

 

[FancyPrairie]

Here's some code I got someplace. This should do it for you.

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

 Function PlaySound(FileName As String)
    
    Dim MyReturn As Long
    
    MyReturn = sndPlaySound(FileName, 1)
    If (MyReturn <> 1) Then GoTo ErrHandler
    
'********************
'*  Exit Procedure  *
'********************
        
ExitProcedure:

    Exit Function

'****************************
'*  Error Recovery Section  *
'****************************
        
ErrHandler:
        
    Msgbox &quot;Error from sndPlaySound&quot; & vbCrLf & &quot;Value is &quot; & MyReturn, vbExclamation

    GoTo ExitProcedure

End Function