Синтаксис
function SendMail(const AFrom, ATheme, ABody: string; const ARecipients: string = ''): TM_Mail;
Описание
Функция доступна в версиях PROFESSIONAL и DEMO-TIME. Для отправки E-mail сообщений необходимо предварительно настроить параметры отправки через "Options.exe" -> раздел "Simple-Scada Server" -> "Отправка E-mail сообщений".
Отправляет E-mail сообщение с темой ATheme, текстом ABody, именем отправителя AFrom и списком E-mail адресов получателей ARecipients, перечисленных через запятую. Если не указывать параметр ARecipients, то сообщение будет отправлено списку получателей заданному в "Options.exe" -> раздел "Simple-Scada Server" -> "Отправка E-mail сообщений". Также, к сообщению можно прикреплять вложения и отчеты.
Пример кода
1. E-mail сообщение без вложений
begin
{ отправить E-mail сообщение на адреса: simple-scada@yandex.ru, simple-scada@rambler.ru }
SendMail('Simple-Scada', 'Авария котла!', 'Превышена максимальная температура', 'simple-scada@yandex.ru, simple-scada@rambler.ru');
{ отправить E-mail сообщение списку получателей заданному в настройках "Options.exe" }
SendMail('Simple-Scada', 'Авария котла!', 'Превышена максимальная температура');
end.
|
2. E-mail сообщение с вложением
var
aMail: TM_Mail;
begin
aMail := SendMail('Simple-Scada', 'Mail с вложением', 'Руководство во вложении'); // создаём сообщение
aMail.AttachFile('E:\Manual.pdf'); // и прикрепляем файл "Manual.pdf"
end.
|
3. E-mail сообщение с отчетом
var
aReport: TM_Report;
aMail: TM_Mail;
begin
aReport := ReportBuild('Отчет'); // строим отчет
aMail := SendMail('Simple-Scada', 'Mail с отчетом', 'Отчет во вложении'); // создаём e-mail сообщение
aMail.AttachReport(aReport, 'Мой отчет'); // прикрепляем отчет к e-mail сообщению с именем "Мой отчет"
end.
|
4. E-mail сообщение с форматированием
Отправка E-mail выполняется в HTML разметке, с помощью которой можно создать практически любую структуру, изменить часть текста, вставить изображение или ссылку и т.д.
var
aText: string;
begin
aText :=
'<p>Строка 1</p>' +
'<p><font color=''red''>Красный цвет</font></p>' +
'<p><b>Жирный текст</b></p>' +
'<p><a href=''simple-scada.com''>Ссылка на сайт</a></p>';
SendMail('Simple-Scada', 'Тема письма', aText);
end.
|