MS Access 2003: reproducir archivos wav (archivos de sonido) a través de API

Los datos expuestos en este blog, son solo de índole informativo. Por favor realiza siempre una copia de seguridad antes de realizar cualquier cambio en tu proyecto.

MS Access 2003: reproducir archivos wav (archivos de sonido) a través de API

Este tutorial de MSAccess explica cómo reproducir archivos wav (archivos de sonido) a través de la API en Access 2003 (con capturas de pantalla e instrucciones paso a paso).

P: En Microsoft Access 2003/XP/2000/97, tengo una base de datos y quiero reproducir un archivo wav (archivo de sonido) desde un formulario. ¿Es posible?

R: Puede reproducir archivos wav en una base de datos de Access. Para hacer esto, cree un nuevo módulo y pegue el siguiente código VBA:

Const SND_ASYNC = (1)
Const SND_NODEFAULT = (2)

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

Public Sub API_PlaySound(pWavFile As String)

   Dim LResult As Long

   'Make a Windows API call to play a wav file
   LResult = sndplaysound(pWavFile, SND_NODEFAULT + SND_ASYNC)

End Sub

Su módulo debería verse así:

Ahora puede llamar a esta función con su nombre de archivo wav así:

Private Sub Command1_Click()

   API_PlaySound "c:windowsmediachimes.wav"

End Sub

El código anterior reproducirá un archivo wav llamado chimes.wav ubicado en el directorio c:windowsmedia. Puede elegir cuándo reproducir el archivo wav (es decir, cuando se abre un formulario, cuando se hace clic en un botón, etc.)