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
generate a report of excel files with links
Remote Web Workplace / RDP
Key combination split desktop into 4
Setting Reporting Services data driven subscription Using Web Service
Translating coordinates from one coordinate system to another
Mac Mail + Exchange 2007 keeping drafts in the 'Drafts' folder after they are sent
help with robocopy syntax
Lightweight network management for mobile workforce
SSRS Combine two datasets into one data region - Must be in report not in SQL server
T-SQL Update Ordering by IDs based on a random number column