Форум программистов, компьютерный форум, киберфорум
Наши страницы

Delphi и сети

Войти
Регистрация
Восстановить пароль
 
 
Рейтинг: Рейтинг темы: голосов - 8, средняя оценка - 4.63
NotBeginner
158 / 158 / 20
Регистрация: 22.02.2013
Сообщений: 2,940
Записей в блоге: 2
#1

Не отправляется письмо - Delphi

18.12.2013, 09:07. Просмотров 1290. Ответов 16
Метки нет (Все метки)

Delphi
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
 // установка SMTP
 SMTP.Host:= 'pop.mail.ru';
 SMTP.Port:=110;
 // установка сообщения
 
 Smtp.Username:='sawa@mail.ru';
 Smtp.Password:='123456';
  Smtp.AuthenticationType:=atLogin; // atNone
 Smtp.ASCIIFilter:=true;
 MailMessage.From.Text:='sawa@mail.ru';
 MailMessage.Subject:='Тема'; // тема
 MailMessage.From.Address:='sawa@mail.ru'; // адрес отправителя
 MailMessage.Recipients.EMailAddresses:='andrey@mail.ru';
 MailMessage.Body.Text:=Memo2.Text; // текст сообщения
 
 try
  try
   SMTP.Connect;
   SMTP.Send(MailMessage);
   ShowMessage('Письмо отправлено!');
  except on E:Exception do
   begin
    ShowMessage('Статус отправки: ERROR - '+E.Message +#10#9 + 'Письмо не отправленно');
   end;
  end;
 finally
  if SMTP.Connected
  then SMTP.Disconnect;
 end;
появляется сообщение - Статус отправки: ERROR -Письмо не отправленно

Добавлено через 8 часов 49 минут
UP!
0
Надоела реклама? Зарегистрируйтесь и она исчезнет полностью.
Similar
Эксперт
41792 / 34177 / 6122
Регистрация: 12.04.2006
Сообщений: 57,940
18.12.2013, 09:07
Здравствуйте! Я подобрал для вас темы с ответами на вопрос Не отправляется письмо (Delphi):

Письмо отправляется но без текста! - Delphi
Всем привет! Вообщем проблема состоит в том что сообщение на почту приходит, но без текста! Хотя текст присутствует, его в сообщении...

Не отправляется письмо: Connection Closed Grasefully - Delphi
Как сделать так, чтобы сервер не сбрасывал соединение?( procedure TForm1.FormCreate(Sender: TObject); begin IdMessage1...

Отправка почты в Delphi. Ошибок нет, но письмо не отправляется - Delphi
unit Unit1; interface uses Winapi.Windows, Winapi.Messages, System.SysUtils, System.Variants, System.Classes, Vcl.Graphics, ...

Не отправляется почта - Delphi
вот код, Synapse подключен, файлы libeay32.dll и ssleay32.dll лежат в папке рядом с exe, подскажите в чем проблема, никаких ошибок нет,...

Synapse не отправляется Get запрос - Delphi
Не могу понять почему так, не отправляется Get запрос. Вот код procedure TForm2.sButton1Click(Sender: TObject); var HTTP:...

Не отправляется e-mail из программы Delphi7 - Delphi
Есть программа,в которой при нажатии на кнопку должно отправляться письмо. Но отправка не происходит + если нажать на кнопку нельзя закрыть...

16
Razdolbait
25 / 25 / 10
Регистрация: 18.09.2014
Сообщений: 201
14.09.2016, 16:14 #16
droider, Все работает, спасибо)
0
droider
Delphist, DataBase Dev
Эксперт Pascal/Delphi
4243 / 2292 / 469
Регистрация: 04.10.2012
Сообщений: 8,268
14.09.2016, 16:35 #17
Цитата Сообщение от Razdolbait Посмотреть сообщение
Все работает
главное - внимательность Удачи.
0
14.09.2016, 16:35
MoreAnswers
Эксперт
37091 / 29110 / 5898
Регистрация: 17.06.2006
Сообщений: 43,301
14.09.2016, 16:35
Привет! Вот еще темы с ответами:

Не отправляется e-mail (smtp.gmail.com) - Delphi
Привет всем доброго времени суток мне нужна помощь хочу отправить мило через делфи использую етот код procedure...

Отправляется GET запрос(а надо POST) - Delphi
Тут отправляется GET запрос с моей программы Тут отправляется POST запрос с другой программы не моей Как сделать чтоб в...

Долго отправляется get запрос synapse - Delphi
Всем привет, я решил сделать для себя клиент instagram, но столкнулся с проблемой, что запрос очень долго идёт, и хоть он отправляется, но...

Не отправляется запрос Delphi (indy) - Delphi
Здравствуйте. Уже не первый день немогу понять в чем ошибка. Если беру готовый запрос(get) и вставляю его в браузер, то все проходит...


Искать еще темы с ответами

Или воспользуйтесь поиском по форуму:
17
Ответ Создать тему
Опции темы

КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin® Version 3.8.9
Copyright ©2000 - 2018, vBulletin Solutions, Inc.