By using this site, you agree to our updated Privacy Policy and our Terms of Use. Manage your Cookies Settings.
435,481 Members | 3,046 Online
Bytes IT Community
+ Ask a Question
Need help? Post your question and get tips & solutions from a community of 435,481 IT Pros & Developers. It's quick & easy.

api for having a warning sound?

P: n/a
Hi All,

I have a database with the timer function set to warn the user that
arecord is due to expire. Is there a Win API that I can use so a loud
warning will go off. Not this simpel beep in access but a really,
like Virus Alert kind of warning?

Regards

Marco
Nov 13 '05 #1
Share this Question
Share on Google+
1 Reply


P: n/a
Option Compare Database
Option Explicit

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

' pszSound
'A string that specifies the sound to play.
'If this parameter is NULL, any currently playing waveform sound is stopped.
'To stop a non-waveform sound, specify SND_PURGE in the fdwSound parameter.
'Three flags in fdwSound (SND_ALIAS, SND_FILENAME, and SND_RESOURCE)
determine whether the name is interpreted
'as an alias for a system event, a filename, or a resource identifier.
'If none of these flags are specified, PlaySound searches the registry or
the WIN.INI file
'for an association with the specified sound name. If an association is
found, the sound event is played.
'If no association is found in the registry, the name is interpreted as a
filename.

' hmod
'Handle of the executable file that contains the resource to be loaded.
'This parameter must be NULL unless SND_RESOURCE is specified in fdwSound.

' fdwSound
'Flags for playing the sound. The following values are defined:
'SND_APPLICATION
'The sound is played using an application-specific association.
'SND_ALIAS
'The pszSound parameter is a system-event alias in the registry or the
WIN.INI file.
'Do not use with either SND_FILENAME or SND_RESOURCE.
'SND_ALIAS_ID
'The pszSound parameter is a predefined sound identifier.
'SND_ASYNC
'The sound is played asynchronously and PlaySound returns immediately after
beginning the sound.
'To terminate an asynchronously played waveform sound, call PlaySound with
pszSound set to NULL.
'SND_FILENAME
'The pszSound parameter is a filename.
'SND_LOOP
'The sound plays repeatedly until PlaySound is called again with the
pszSound parameter set to NULL.
'You must also specify the SND_ASYNC flag to indicate an asynchronous sound
event.
'SND_MEMORY
'A sound event's file is loaded in RAM.
'The parameter specified by pszSound must point to an image of a sound in
memory.
'SND_NODEFAULT
'No default sound event is used. If the sound cannot be found,
'PlaySound returns silently without playing the default sound.
'SND_NOSTOP
'The specified sound event will yield to another sound event that is already
playing.
'If a sound cannot be played because the resource needed to generate that
sound is busy playing another sound,
'the function immediately returns FALSE without playing the requested sound.
'If this flag is not specified, PlaySound attempts to stop the currently
playing sound
'so that the device can be used to play the new sound.
'SND_NOWAIT
'If the driver is busy, return immediately without playing the sound.
'SND_PURGE
'Sounds are to be stopped for the calling task.
'If pszSound is not NULL, all instances of the specified sound are stopped.
'If pszSound is NULL, all sounds that are playing on behalf of the calling
task are stopped.
'You must also specify the instance handle to stop SND_RESOURCE events.
'SND_RESOURCE
'The pszSound parameter is a resource identifier; hmod must identify the
instance that contains the resource.
'SND_SYNC
'Synchronous playback of a sound event. PlaySound returns after the sound
event completes."

Private Const SND_APPLICATION = &H80 ' look for application specific
association

Private Const SND_ALIAS = &H10000 ' name is a WIN.INI [sounds] entry

Private Const SND_ALIAS_ID = &H110000 ' name is a WIN.INI [sounds] entry
identifier

Private Const SND_ASYNC = &H1 ' play asynchronously

Private Const SND_FILENAME = &H20000 ' name is a file name

Private Const SND_LOOP = &H8 ' loop the sound until next sndPlaySound

Private Const SND_MEMORY = &H4 ' lpszSoundName points to a memory file

Private Const SND_NODEFAULT = &H2 ' silence not default, if sound not found

Private Const SND_NOSTOP = &H10 ' don't stop any currently playing sound

Private Const SND_NOWAIT = &H2000 ' don't wait if the driver is busy

Private Const SND_PURGE = &H40 ' purge non-static events for task

Private Const SND_RESOURCE = &H40004 ' name is a resource name or atom

Private Const SND_SYNC = &H0 ' play synchronously (default)

Function PlayIt()

PlaySound "C:\\WINDOWS\\MEDIA\\TADA.WAV", ByVal 0&, SND_FILENAME Or
SND_ASYNC

End Function

Appears to work, but don't ask any questions. Found it somewhere

HTH

Phil

"Marco Krechting" <ma************@zonnet.nl> wrote in message
news:52*************************@posting.google.co m...
Hi All,

I have a database with the timer function set to warn the user that
arecord is due to expire. Is there a Win API that I can use so a loud
warning will go off. Not this simpel beep in access but a really,
like Virus Alert kind of warning?

Regards

Marco

Nov 13 '05 #2

This discussion thread is closed

Replies have been disabled for this discussion.