Microsoft
Software
Hardware
Network
Question : make it stop!
I want to have a macro/script that will play a sound looped when mail is recieved and wil play over and over until I read the email. I would also like to have a button on the toolbar that stops the looping. BlueDevilFan came up with this for me, but I don't know how to make it stop... any ideas?
Private Declare Function sndPlaySound Lib "winmm.dll" Alias "sndPlaySoundA" _
(ByVal lpszSoundName As String, ByVal uFlags As Long) As Long
Const SND_ASYNC = &H1
Const SND_LOOP = &H8
Const SND_NODEFAULT = &H2
Const SND_SYNC = &H0
Const SND_NOSTOP = &H10
Const SND_MEMORY = &H4
Sub PlaySoundLoop(strCommand As String, strSound As String)
Select Case LCase(strCommand)
Case "start"
sndPlaySound strSound, SND_LOOP + SND_ASYNC
Case "stop"
sndPlaySound vbNull, SND_ASYNC
End Select
End Sub
'Duplicate this subroutine for each recipient you want to play a sound for. Be sure to change the name.'
Sub PlayWarningA(Item As Outlook.MailItem)
'Change the path and sound file name on the following line as desired'
PlaySoundLoop "start", "C:\Windows\Media\Ding.wav
"
End Sub
Sub PlayWarningB(Item As Outlook.MailItem)
'Change the path and sound file name on the following line as desired'
PlaySoundLoop "start", "C:\Windows\Media\SomeFile
.wav"
End Sub
Sub StopWarning()
PlaySoundLoop "stop"
End Sub
Answer : make it stop!
Acronis says that it can restore to dis-similar hardware - see this Acronis article
http://kb.acronis.com/cont
ent/1566
Random Solutions
Physical installation of the Exchange 2007
Terminal Server Printing
ASP.NET Membership minRequiredNonalphanumeric
Characters
Problem
If folder does not exist, then create one
need to send and receive one domains email from another domains outlook?
Asp.Net I need help. I am not passing Date values to my the Conrol Parameters?? in a SqlDatasource using Ajax
IIS Web site works in all browsers except Safari on Mac
dns server is not reachable in exchange server 2010
publishing websites in TMG 2010
Web site works using IP but not Localhost