()
Искал себе как сделать звуковую индикацию ошибочного ввода в 1с через спикер (потому как может не быть колонок, или выключен звук, или использоваться схема без звука)
Вот в итоге получиась такая небольшая процедурина:
Процедура глБиип(КолЗвуков=0)
Если КолЗвуков=0 Тогда Возврат; КонецЕсли;
Shell = Новый COMОбъект("WScript.Shell");
Команда = "%comspec% /c @echo ";
Для Ном = 1 по КолЗвуков Цикл
Команда = Команда + Символ(7);
КонецЦикла;
Shell.Run(Команда,0,0);
КонецПроцедуры
Показать