1С 8.3 БСП АдресаЭлектроннойПочтыИзСтроки
Данные > 1С 8.3 БСП > Почтовые сообщения и e-mail
Перейти в раздел примеры кода 1С 8.3:
1С 8.3 БСП АдресаЭлектроннойПочтыИзСтроки. Разбирает строку с адресами электронной почты. При разборе проверяет корректность адресов.
Примера кода от rayastar
Результат = ОбщегоНазначенияКлиентСервер.АдресаЭлектроннойПочтыИзСтроки(СписокАдресов);
//
&НаСервере
Процедура ЗаполнитьТаблицуПолучателейИзСтроки(Знач ПараметрыПолучателейСообщения)
ПараметрыПолучателейСообщения = ОбщегоНазначенияКлиентСервер.АдресаЭлектроннойПочтыИзСтроки(ПараметрыПолучателейСообщения);
Для Каждого ПараметрыПолучателя Из ПараметрыПолучателейСообщения Цикл
Получатель = ПолучателиСообщения.Добавить();
Получатель.Адрес = ПараметрыПолучателя.Адрес;
Получатель.Представление = ПараметрыПолучателя.Псевдоним;
Получатель.ПредставлениеАдреса = Получатель.Адрес;
КонецЦикла;
КонецПроцедуры
//
&НаСервере
Процедура ЗаполнитьТаблицуПолучателейИзСтроки(Знач ПараметрыПолучателейСообщения)
ПараметрыПолучателейСообщения = ОбщегоНазначенияКлиентСервер.АдресаЭлектроннойПочтыИзСтроки(ПараметрыПолучателейСообщения);
Для Каждого ПараметрыПолучателя Из ПараметрыПолучателейСообщения Цикл
Получатель = ПолучателиСообщения.Добавить();
Получатель.Адрес = ПараметрыПолучателя.Адрес;
Получатель.Представление = ПараметрыПолучателя.Псевдоним;
Получатель.ПредставлениеАдреса = Получатель.Адрес;
КонецЦикла;
КонецПроцедуры
// Автор библиотеки: ООО "1С-Софт". Все права защищены © 2021
// Типовая конфигурация Библиотека стандартных подсистем (далее - БСП)
// Код БСП распространяется по лицензии Attribution 4.0 International (CC BY 4.0):
// ссылка на лицензию: https://creativecommons.org/licenses/by/4.0/legalcode
// Код БСП распространяется по лицензии Attribution 4.0 International (CC BY 4.0):
// ссылка на лицензию: https://creativecommons.org/licenses/by/4.0/legalcode
0
комментарии
____________________
Перепечатка текста и фотографий разрешена при наличии прямой ссылки на источник