По теме из базы знаний
Найденные решения
Сам отвечу, если использовать следующий код то выскакивает предложение выбрать почтовый клиент и если установлен Mail то предлагает отправить себе либо можно забить адресата (с другими клиентами не проверял)
&НаКлиенте
Процедура ОтправитьСебе(Команда)
#Если МобильноеПриложениеКлиент Тогда
Если СредстваПочты.ПоддерживаетсяОтправка() Тогда
Письмо = Новый ИнтернетПочтовоеСообщение;
СтрокаПолучатели = СтрРазделить(Получатели, ",; ",Ложь);
Для Каждого Стр Из СтрокаПолучатели Цикл
Письмо.Получатели.Добавить(Стр);
КонецЦикла;
ТекстСообщения ="Отправлено из программы";
ТемаСообщения ="Справка";
Письмо.Тексты.Добавить(ТекстСообщения);
Письмо.Тема = ТемаСообщения;
Письмо.Вложения.Добавить(ПолучитьФайлНаСервере());
СредстваПочты.Послать(Письмо);
ПоказатьПредупреждение(,"Сообщение было отправлено");
Иначе
ПоказатьПредупреждение(,"Не поддерживается работа с отправкой почты!");
КонецЕсли;
#КонецЕсли
КонецПроцедуры
ПоказатьОстальные ответы
Подписаться на ответы
Инфостарт бот
Сортировка:
Древо развёрнутое
Свернуть все
Сам отвечу, если использовать следующий код то выскакивает предложение выбрать почтовый клиент и если установлен Mail то предлагает отправить себе либо можно забить адресата (с другими клиентами не проверял)
&НаКлиенте
Процедура ОтправитьСебе(Команда)
#Если МобильноеПриложениеКлиент Тогда
Если СредстваПочты.ПоддерживаетсяОтправка() Тогда
Письмо = Новый ИнтернетПочтовоеСообщение;
СтрокаПолучатели = СтрРазделить(Получатели, ",; ",Ложь);
Для Каждого Стр Из СтрокаПолучатели Цикл
Письмо.Получатели.Добавить(Стр);
КонецЦикла;
ТекстСообщения ="Отправлено из программы";
ТемаСообщения ="Справка";
Письмо.Тексты.Добавить(ТекстСообщения);
Письмо.Тема = ТемаСообщения;
Письмо.Вложения.Добавить(ПолучитьФайлНаСервере());
СредстваПочты.Послать(Письмо);
ПоказатьПредупреждение(,"Сообщение было отправлено");
Иначе
ПоказатьПредупреждение(,"Не поддерживается работа с отправкой почты!");
КонецЕсли;
#КонецЕсли
КонецПроцедуры
Показать
НовВз = Новый ЗапускПриложенияМобильногоУстройства();
НовВз.Действие = "android.intent.action.SENDTO";
НовВз.Данные = "mailto:test@test.ru";
ЕстьПочтовыйКлиент = НовВз.Запустить(Ложь);
Это даст понимание, но вызовет открытие на устройстве списка выбора приложения. Но если передать так параметры, а не через СредстваПочты.Послать(Письмо), то можно будет после нажатия получить письмо в выбранном приложении. Но SENDTO не поддерживает несколько вложений, только одно можно передать.
НовВз.Действие = "android.intent.action.SENDTO";
НовВз.Данные = "mailto:test@test.ru";
ЕстьПочтовыйКлиент = НовВз.Запустить(Ложь);
Это даст понимание, но вызовет открытие на устройстве списка выбора приложения. Но если передать так параметры, а не через СредстваПочты.Послать(Письмо), то можно будет после нажатия получить письмо в выбранном приложении. Но SENDTO не поддерживает несколько вложений, только одно можно передать.
Для получения уведомлений об ответах подключите телеграм бот:
Инфостарт бот