Topic: [Скрипт] Отправка E-mail

Отправка E-mail сообщения с файлом.
начиная с версии 4.05 вы можете указать несколько адресатов разделяя их знаком ;



procedure Form1_bSend_OnClick (Sender: string; var Cancel: boolean);
begin
    Form1.bSend.Enabled := False;

    if SendMail(Form1.edServer.Text, Form1.edUsername.Text, Form1.edPassword.Text, Trunc(Form1.edPort.Value), Form1.edFrom.Text, Form1.edTo.Text, Form1.edSubject.Text, Form1.mmMessage.Text, Form1.edFileName.Text) then
        ShowMessage('Message sent');

    Form1.bSend.Enabled := True;
end;


begin
end.

Проект с примером:

Post's attachments

Attachment icon SendMail.zip 3.42 kb, 1081 downloads since 2015-04-30 

Dmitry.

Re: [Скрипт] Отправка E-mail

сталкнулся с проблемой ...
windows 8.1 блокирует соединение с почтой

3 (edited by sibprogsistem 2019-03-07 00:04:19)

Re: [Скрипт] Отправка E-mail

все способы перепробовал.. в windows 7 работает а в 8.1 и 10 не хочет

http://myvisualdatabase.com/forum/misc.php?action=pun_attachment&item=5158&download=0

Post's attachments

Attachment icon Image 1.jpg 19.78 kb, 29 downloads since 2019-03-07 

Re: [Скрипт] Отправка E-mail

Тут я мало, что могу сделать,  необходимо добавить программу в исключения для брендмаура Windows, либо в настройках вашего антивируса.

Dmitry.

5 (edited by sibprogsistem 2019-03-07 18:11:41)

Re: [Скрипт] Отправка E-mail

проверил через почтовый сервис the bat, smtp соединение сработало только когда я выбрал (требовать безопастную аутентификацию)
в MVD есть что-то подобное?

http://myvisualdatabase.com/forum/misc.php?action=pun_attachment&item=5159&download=0

Post's attachments

Attachment icon Image 1.png 7.99 kb, 29 downloads since 2019-03-07 

Re: [Скрипт] Отправка E-mail

Это не от винды зависит, а бог знает от чего...  у меня дома три компа, с разными операционками (win 7,8,10) , ни на одном не работает, выдает такую же ошибку.  Причем примерно из 30 попыток одна заканчивается успешно, остальные - таймаут.  Сначала думал на антивирусник (awast). Отключал всё: и брандмауэр, и антивирусник.... остался  роутер под подозрением

Создание приложений https://sites.google.com/view/my-visual-database
Курсы программирования https://vk.com/createmyvisualdatabaseapp

Re: [Скрипт] Отправка E-mail

sibprogsistem wrote:

проверил через почтовый сервис the bat, smtp соединение сработало только когда я выбрал (требовать безопастную аутентификацию)
в MVD есть что-то подобное?

По умолчанию в MVD smtp соединение требует безопастную аутентификацию

Dmitry.