Инструменти за потребители

Инструменти за сайта


kak_da:prastane_po_email_na_podlozka

Как да се настрои изпращане на мейли през печатните форми

Инструкция за настройка:

1. Необходимо е да се създаде пайплайн с име SMTP. В него се поставя следния код:

select
 (select G.CONSTANT_VALUE from SYS$GET_ACTION_CONST_AS_STR(1, null, 'SMTP_HOST_NAME') G) HOST_NAME,
 (select G.CONSTANT_VALUE from SYS$GET_ACTION_CONST_AS_STR(1, null, 'SMTP_PORT') G) PORT,
 (select G.CONSTANT_VALUE from SYS$GET_ACTION_CONST_AS_STR(1, null, 'SMTP_USERNAME') G) USERNAME,
 (select G.CONSTANT_VALUE from SYS$GET_ACTION_CONST_AS_STR(1, null, 'SMTP_PASSWORD') G) SMTP_PASSWORD 
from
 RDB$DATABASE

2. В константи на интерфейси се създават 4 константи:

SMTP_HOST_NAME - попълва се хоста - за gmail е smtp.gmail.com
SMTP_PORT - за gmail е 578
SMTP_USERNAME - мейл, от който се изпращат мейлите (изпращач)
SMTP_PASSWORD - парола за мейла изпращач

3. В calc в Report→ReportOnStartFirstPass се поставя следния код:

if (SMTP.FieldObjects['HOST_NAME'].Value <> null) then
   Report.EmailSettings.HostAddress := SMTP['HOST_NAME'];
 if (SMTP.FieldObjects['PORT'].Value <> null) then
   Report.EmailSettings.Port := SMTP['PORT'];
 if (SMTP.FieldObjects['USERNAME'].Value <> null) then
   Report.EmailSettings.Username := SMTP['USERNAME'];
 if (SMTP.FieldObjects['USERNAME'].Value <> null) then
   Report.EmailSettings.FromAddress := SMTP['USERNAME'];
 if (SMTP.FieldObjects['SMTP_PASSWORD'].Value <> null) then
   Report.EmailSettings.Password := SMTP['SMTP_PASSWORD'];

4. В Design → User Interface → EmailSettings → ShowEmailDialog = True

5. В настройките на имейла се позволява изпращане на мейли от външни приложения.

  • За gmail се прави от следната настройка :

Настройки → Препращане и POP/IMAP достъп → POP/IMAP достъп = POP/IMAP достъпът да се активира.

  • Настройки на профила (клик върху аватара на профила) → Сигурност → Достъп на не толкова надеждни приложения → Включи
kak_da/prastane_po_email_na_podlozka.txt · Последна промяна: 2022/08/11 13:33 от t.lalova