как проиграть звук на Маке?
На моем ПиСи макрос работает, ессно, нормально.
Если ту же команду пускаю на Маке (в МакВорде тоже есть редактор VBA), то, комп, ессно пишет, что не найден файл Winmm.dll. Кто-то знает, как из-под Мака получить звук в VBA? На какие библиотеки надо ссылаться на Маках?
Код:
Declare Function sndPlaySound Lib "Winmm.dll" Alias "sndPlaySoundA" (ByVal lpszSoundName As String, ByVal uFlags As Long) As Long
Sub mPlay_wav(ByVal n As String)
Dim s As Long
s = sndPlaySound(n, &H1)
End Sub
Sub myzvuk()
mPlay_wav "C:\Sounds\bip.wav"
End Sub
Sub mPlay_wav(ByVal n As String)
Dim s As Long
s = sndPlaySound(n, &H1)
End Sub
Sub myzvuk()
mPlay_wav "C:\Sounds\bip.wav"
End Sub
MacScript ("tell app ""QTShell"" to open ""путь:к:файлу.wav""") кактотак
Цитата: arrjj
MacScript ("tell app ""QTShell"" to open ""путь:к:файлу.wav""") кактотак
Ага, спасибо большое. В понедельник на работе попробую и отпишусь, пошло или нет))
не прошло и года... )))
Получилось только после установки приложения PlaySound1.6.7.dmg и прописке его в AppleScript'e.Из VBA пока не играется (пишет: "не найден файл... все, что подставлял - не находится). Может синтаксис не правильно пишу, а может вообще Маки ничего просто так не видит. А может VBA на маке ничего не видит и т.п. Так что пока подзвучка из VBA не решается...
Получилось только после установки приложения PlaySound1.6.7.dmg и прописке его в AppleScript'e.Из VBA пока не играется (пишет: "не найден файл... все, что подставлял - не находится). Может синтаксис не правильно пишу, а может вообще Маки ничего просто так не видит. А может VBA на маке ничего не видит и т.п. Так что пока подзвучка из VBA не решается...