hi friends!
pl help me how to make alarm.
actually the functionality is like this.
when a particular event occurs the alarm should make voice for first five seconds then it has to wait for five more seconds and then it has to make voice again, till it gets acknowledge by clicking other button.
pl help me how to proceed with this, i have used following function i am not understandin whats wrong with this..

Public Sub Warn(ByVal n As Integer)
Dim i As Integer
For i = 0 To n
Call sndPlaySound(ByVal "c:\my documents\wailingalarm.wav", SND_ASYNC)
Next i

pl correct it to get my functioanality please
..


bye reply asap
giridhar
End Sub