Frage : es Anschlag bilden!

Ich möchte ein Makro-/einen Index haben, die einen geschlungenen Ton spielen, wenn Post und wil Spiel über und über empfangen, bis ich die eMail lese.  Ich möchte auch einen Knopf auf der Symbolleiste haben, die die Schleifung stoppt.  BlueDevilFan aufkam mit diesem für mich ch, aber ich kann nicht es Anschlag bilden… irgendwelche Ideen?

Private erklären, dass Funktion sndPlaySound Bibliothek „winmm.dll“ alias „sndPlaySoundA“ _
(ByVal lpszSoundName als Schnur, ByVal uFlags als lang) als 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 als Schnur, strSound als Schnur)
Fall LCase (strCommand)
Fall„Anfangs"
sndPlaySound strSound, SND_LOOP + SND_ASYNC
Fall„End"
sndPlaySound vbNull, SND_ASYNC
Ende Select
End Sub

'Duplicate diese Subroutine für jede Empfänger vorwählen, die Sie einen Ton spielen möchten für.  Sicher sein, den Namen zu ändern. '
Sub PlayWarningA (Einzelteil als Outlook.MailItem)
'Änderung der Weg- und Tondateiname auf der folgenden Linie wie desired' Br PlaySoundLoop „Anfangs-“, „C:\Windows\Media\Ding.wav "
Sub
End
Sub/> 'Änderung der Weg- und Tondateiname auf der folgenden Linie wie desired'< Br/> PlaySoundLoop „Anfang“, „C:\Windows\Media\SomeFile .wav "
End Sub

Sub StopWarning ()
PlaySoundLoop „End"
End Sub

Antwort : es Anschlag bilden!

Acronis sagt, dass es zur ungleichartigen Hardware wieder herstellen kann - diesen Acronis Artikel http://kb.acronis.com/content/1566 sehen