Как открыть веб-браузер из 1С: Предприятие 8.3 в тонком и толстом клиентах?

[Odineski]

{Wpp_Счет Документ.СчетНаОплатуПокупателю.Форма.ФормаДокумента.Форма(9,5)}: Процедура или функция с указанным именем не определена (КомандаОткрытьВебБраузер)
<<?>>КомандаОткрытьВебБраузер(URL); (Проверка: Сервер)
{Wpp_Счет Документ.СчетНаОплатуПокупателю.Форма.ФормаДокумента.Форма(6,5)}: Процедура или функция с указанным именем не определена (ОткрытьВебБраузер)
<<?>>ОткрытьВебБраузер(URL); (Проверка: Сервер)
{Wpp_Счет Документ.СчетНаОплатуПокупателю.Форма.ФормаДокумента.Форма(6,5)}: Процедура или функция с указанным именем не определена (ОткрытьВебБраузер)
<<?>>ОткрытьВебБраузер(URL); (Проверка: Тонкий клиент)

[Odin — Одинэсник]

Ошибка говорит, что в вашей конфигурации и платформе нет ни процедуры ОткрытьВебБраузер, ни КомандаОткрытьВебБраузер. Это значит, что стандартных встроенных функций для открытия браузера в вашем окружении нет.

—

### Как открыть браузер по умолчанию из 1С в разных вариантах:

1. Толстый клиент (Windows)
Используйте вызов внешней команды через ВыполнитьКоманду:

1С (Код)

&НаКлиенте Процедура ОткрытьСсылкуВБраузере(URL) ВыполнитьКоманду("cmd /c start " + URL); КонецПроцедуры

1 2 3 4

&НаКлиенте Процедура ОткрытьСсылкуВБраузере(URL)     ВыполнитьКоманду("cmd /c start " + URL); КонецПроцедуры

Вызов:

1С (Код)

&НаКлиенте Процедура КнопкаWhatsAppНажатие(Кнопка) Экспорт ТекстСообщения = "Счет №" + Объект.Номер + " от " + Формат(Объект.Дата, "ДФ=dd.MM.yyyy") + "%0AСумма: " + Формат(Объект.Сумма, "ЧЦ=2") + " руб."; URL = "https://web.whatsapp.com/send?text=" + ТекстСообщения; ОткрытьСсылкуВБраузере(URL); КонецПроцедуры

1 2 3 4 5 6 7

&НаКлиенте Процедура КнопкаWhatsAppНажатие(Кнопка) Экспорт     ТекстСообщения = "Счет №" + Объект.Номер + " от " + Формат(Объект.Дата, "ДФ=dd.MM.yyyy") + "%0AСумма: " + Формат(Объект.Сумма, "ЧЦ=2") + " руб.";     URL = "https://web.whatsapp.com/send?text=" + ТекстСообщения;       ОткрытьСсылкуВБраузере(URL); КонецПроцедуры

—

2. Тонкий клиент и веб-клиент
В тонком и веб-клиенте нет прямого способа открыть браузер, так как они уже работают в браузере или ограничены в вызове внешних программ.

Для веб-клиента можно использовать:

1С (Код)

&НаКлиенте Процедура КнопкаWhatsAppНажатие(Кнопка) Экспорт ТекстСообщения = "Счет №" + Объект.Номер + " от " + Формат(Объект.Дата, "ДФ=dd.MM.yyyy") + "%0AСумма: " + Формат(Объект.Сумма, "ЧЦ=2") + " руб."; URL = "https://web.whatsapp.com/send?text=" + ТекстСообщения; // В веб-клиенте можно открыть ссылку через окно браузера ОткрытьВебСтраницу(URL); КонецПроцедуры

1 2 3 4 5 6 7 8

&НаКлиенте Процедура КнопкаWhatsAppНажатие(Кнопка) Экспорт     ТекстСообщения = "Счет №" + Объект.Номер + " от " + Формат(Объект.Дата, "ДФ=dd.MM.yyyy") + "%0AСумма: " + Формат(Объект.Сумма, "ЧЦ=2") + " руб.";     URL = "https://web.whatsapp.com/send?text=" + ТекстСообщения;       // В веб-клиенте можно открыть ссылку через окно браузера     ОткрытьВебСтраницу(URL); КонецПроцедуры

ОткрытьВебСтраницу — стандартная процедура для веб-клиента.

—

3. Если ОткрытьВебСтраницу не доступна в тонком клиенте

Можно попробовать через ОткрытьЗначение:

1С (Код)

&НаКлиенте Процедура КнопкаWhatsAppНажатие(Кнопка) Экспорт ТекстСообщения = "Счет №" + Объект.Номер + " от " + Формат(Объект.Дата, "ДФ=dd.MM.yyyy") + "%0AСумма: " + Формат(Объект.Сумма, "ЧЦ=2") + " руб."; URL = "https://web.whatsapp.com/send?text=" + ТекстСообщения; ОткрытьЗначение(URL); КонецПроцедуры

1 2 3 4 5 6 7

&НаКлиенте Процедура КнопкаWhatsAppНажатие(Кнопка) Экспорт     ТекстСообщения = "Счет №" + Объект.Номер + " от " + Формат(Объект.Дата, "ДФ=dd.MM.yyyy") + "%0AСумма: " + Формат(Объект.Сумма, "ЧЦ=2") + " руб.";     URL = "https://web.whatsapp.com/send?text=" + ТекстСообщения;       ОткрытьЗначение(URL); КонецПроцедуры

ОткрытьЗначение откроет ссылку в браузере.

—

### Итог:

— Для толстого клиента — используйте ВыполнитьКоманду("cmd /c start " + URL);
— Для веб-клиента — используйте ОткрытьВебСтраницу(URL);
— Для тонкого клиента — попробуйте ОткрытьЗначение(URL);

—

### Пример универсальной процедуры с проверкой клиента:

1С (Код)

&НаКлиенте Процедура ОткрытьСсылку(URL) Если ТипКлиента() = Тип("ТипыКлиентов.ТонкийКлиент") Тогда ОткрытьЗначение(URL); ИначеЕсли ТипКлиента() = Тип("ТипыКлиентов.ВебКлиент") Тогда ОткрытьВебСтраницу(URL); Иначе // толстый клиент ВыполнитьКоманду("cmd /c start " + URL); КонецЕсли; КонецПроцедуры

1 2 3 4 5 6 7 8 9 10

&НаКлиенте Процедура ОткрытьСсылку(URL)     Если ТипКлиента() = Тип("ТипыКлиентов.ТонкийКлиент") Тогда         ОткрытьЗначение(URL);     ИначеЕсли ТипКлиента() = Тип("ТипыКлиентов.ВебКлиент") Тогда         ОткрытьВебСтраницу(URL);     Иначе // толстый клиент         ВыполнитьКоманду("cmd /c start " + URL);     КонецЕсли; КонецПроцедуры

Вызов:

1С (Код)

&НаКлиенте Процедура КнопкаWhatsAppНажатие(Кнопка) Экспорт ТекстСообщения = "Счет №" + Объект.Номер + " от " + Формат(Объект.Дата, "ДФ=dd.MM.yyyy") + "%0AСумма: " + Формат(Объект.Сумма, "ЧЦ=2") + " руб."; URL = "https://web.whatsapp.com/send?text=" + ТекстСообщения; ОткрытьСсылку(URL); КонецПроцедуры

1 2 3 4 5 6 7

&НаКлиенте Процедура КнопкаWhatsAppНажатие(Кнопка) Экспорт     ТекстСообщения = "Счет №" + Объект.Номер + " от " + Формат(Объект.Дата, "ДФ=dd.MM.yyyy") + "%0AСумма: " + Формат(Объект.Сумма, "ЧЦ=2") + " руб.";     URL = "https://web.whatsapp.com/send?text=" + ТекстСообщения;       ОткрытьСсылку(URL); КонецПроцедуры

—

Если нужна помощь с конкретным кодом — пиши.

[Автор]

Сообщения