Захотелось вот добавить мультимедийности своим могучим макросам. Порылся в книжках, надыбал вот такую функцию
============================================
Private Declare Function PlaySound Lib "winmm.dll" _
Alias "PlaySoundA" (ByVal lpszName As String, _
ByVal hModule As Long, ByVal cVwFlags As Long) As Long
Const SND_SYNC = &H0
Const SND_FILENAME = &H20000
Const SND_ASYNC = &H1
Sub PlayWAVO()
WAVFILE = "good_shot_commander2.wav"
WAVFILE = "C:\Program Files\Valve\czero\sound\radio\bot" & WAVFILE
Call PlaySound(WAVFILE, 0&, SND_ASYNC Or SND_FILENAME)
End Sub
==================================================
НЕ РАБОТАЕТ! Ошибок при компиляции не выдает, но и не играет. Я думал дело в библиотеке winmm.dll, нашел, она есть у меня в систем32. Хелп плиз.
============================================
Private Declare Function PlaySound Lib "winmm.dll" _
Alias "PlaySoundA" (ByVal lpszName As String, _
ByVal hModule As Long, ByVal cVwFlags As Long) As Long
Const SND_SYNC = &H0
Const SND_FILENAME = &H20000
Const SND_ASYNC = &H1
Sub PlayWAVO()
WAVFILE = "good_shot_commander2.wav"
WAVFILE = "C:\Program Files\Valve\czero\sound\radio\bot" & WAVFILE
Call PlaySound(WAVFILE, 0&, SND_ASYNC Or SND_FILENAME)
End Sub
==================================================
НЕ РАБОТАЕТ! Ошибок при компиляции не выдает, но и не играет. Я думал дело в библиотеке winmm.dll, нашел, она есть у меня в систем32. Хелп плиз.