How to send a dynamic table?

F

fboss992021-05-06 14:35:28

1C

fboss99, 2021-05-06 14:35:28

&НаКлиенте
Процедура Отправить(Кнопка)
Если НЕ ПроверитьЗаполнение() Тогда
Возврат
КонецЕсли;
ПрофильПодключения = Новый ИнтернетПочтовыйПрофиль;
ПрофильПодключения.АдресСервераSMTP ="smtp.yandex.ru";
ПрофильПодключения.ИспользоватьSSLSMTP=Истина;
ПрофильПодключения.ПортSMTP = 465;
ПрофильПодключения.ПользовательSMTP = "[email protected]";
ПрофильПодключения.ПарольSMTP ="Pochta1c";
Почта = Новый ИнтернетПочта;
Попытка
Почта.Подключиться(ПрофильПодключения);
Исключение
Сообщить("Не удалось подключиться к серверу smtp.yandex.ru");
Сообщить(ОписаниеОшибки());
КонецПопытки;
Письмо = Новый ИнтернетПочтовоеСообщение;
Текст = Письмо.Тексты.Добавить();
Текст.ТипТекста = ТипТекстаПочтовогоСообщения.HTML;
Текст.Текст = "
|<html>
|<body>
|Здравствуйте, Иван Иванович!
|<br><br>
|Список заказов с суммой от "+ сумма + ". за период с " + Период + ":"
"
|<style>
|th {
|font-weight: normal;
|}
|table {
|width: 50%;
|border-collapse: collapse;
|}
|td, th {
|padding: 4px;
|border: 1px solid black;
|}
|</style>
|<br><br>
|<table>
|<thead>
|<th> № </th><th>Дата</th><th>Клиент</th><th>Сумма</th><th>Менеджер</th>
|</thead>
|<tbody>
|<tr align=center>
|<td> УТ-0001 </td><td> 10.09.2019 </td><td>ООО «Ромашка» </td>
|<td> 100 000 руб. </td><td> Павлов Н.И. </td></tr>
|<tr align=center>
|<td> УТ-0004 </td><td> 12.09.2019 </td><td> ИП Петров Н.В. </td>
|<td> 230 000 руб. </td><td> Лебедева Н.С. </td></tr>
|<tr align=center>
|<td> УТ-0015 </td><td> 13.09.2019 </td><td> ИП Петров Н.В. </td>
|<td> 130 000 руб. </td><td> Лебедева Н.С. </td></tr>
|</tbody>
|</table>
|<br><br>
|Всего 3 заказа на сумму 460 000 (Четыреста шестьдесят тысяч) руб.»
|</body>
|</html>";
Письмо.Тема = "
|«Крупные заказы за период с " + Период +
"";
Письмо.Отправитель = "[email protected]";
Письмо.ИмяОтправителя = "Бубнов Александр Сергеевич";
Письмо.Получатели.Добавить("[email protected]");
Письмо.СлепыеКопии.Добавить("[email protected]");
Попытка
Почта.Послать(Письмо);
Исключение
Сообщить("Не удалось отправить письмо ");
Сообщить(ОписаниеОшибки());
КонецПопытки;
Почта.Отключиться();
КонецПроцедуры

here is the 1c code, it has a table with constant data, it is necessary that the same table is sent to the mail, but the data in it is taken from the Documents.OrderCustomer table?

Reply

Answer the question

In order to leave comments, you need to log in

2 answer(s)

D

Denis Melnikov, 2021-05-06
@Mi11er

And what is the difficulty to loop through the table and just insert into the text?

Для каждого строка из ЧегоТо Цикл
    ТелоПисьма = "|" + Символы.ПС;
    ТелоПисьма = ТелоПисьма + "|"+ Строка.Наименование + Символы.ПС;
КонецЦикла;

D

Dmitry Kinash, 2021-05-07
@Dementor

so that the same table is sent to the mail, but the data in it is taken from the Documents.OrderCustomer table

1) You make a request to the table of orders and select the required fields (number, date, customer, etc.)
2) You bypass the result of the request and form an order description for the table.