Форум программистов, компьютерный форум, киберфорум
Delphi для начинающих
Войти
Регистрация
Восстановить пароль
Блоги Сообщество Поиск  
 
 
Рейтинг 4.59/34: Рейтинг темы: голосов - 34, средняя оценка - 4.59
16 / 16 / 10
Регистрация: 11.09.2013
Сообщений: 157
Записей в блоге: 1

Не отправляется e-mail

01.11.2014, 20:18. Показов 8142. Ответов 49
Метки нет (Все метки)

Студворк — интернет-сервис помощи студентам
Пытаюсь отправить, что-нибудь на email из Delphi 7, до этого ранее отправлял, но старые примеры не работают, не понимаю в чём дело.

Применяются 2 компонента: IdMessage и IdSMTP
Вот код:
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
Smtp.Username:='LOGIN@mail.ru';
Smtp.Password:='PASSWORD';
Smtp.AuthenticationType:=atLogin; // atNone
Smtp.ASCIIFilter:=true;
MailMessage.From.Text:='LOGIN@mail.ru';
MailMessage.Subject:='TEMA E-MAIL'; // ????
MailMessage.From.Address:='LOGIN@mail.ru'; // ????? ???????????
MailMessage.Recipients.EMailAddresses:='LOGIN@mail.ru';
MailMessage.Body.Text:='TEXT EMAIL'; // ????? ?????????
 
try
  try
   SMTP.Connect;
   SMTP.Send(MailMessage);
   ShowMessage('OK!');
   except on E:Exception do
   begin
     ShowMessage('ERROR - '+E.Message +#10#9 + 'PISMO NT OTPRAVLENO');
   end;
 end;
 finally
 if SMTP.Connected
  then SMTP.Disconnect;
 end;
(Логин и Пароль - заменены словами)
При отправке - появляется ошибка.
Скажите, что тут не так или отправьте точно-работающий код.
Спасибо.
0
IT_Exp
Эксперт
34794 / 4073 / 2104
Регистрация: 17.06.2006
Сообщений: 32,602
Блог
01.11.2014, 20:18
Ответы с готовыми решениями:

Не отправляется mail
Приветствую. Есть скрипт обратной связи, и он не работает. Выскакивает при проверке на присутствие данных. В чём может быть проблема?...

Информация не отправляется на e-mail
Здравствуйте. Информация переданная из js не отправляется на email. Не могу понять почему. Вот код js: ...

Не отправляется сообщение на e-mail
if ($s == mailsent){ if (isset($_POST)) { $mail = $_POST; if ($mail == '') { unset($mail);} } if (isset($_POST)) { $txet=$_POST; if...

49
Эксперт С++
 Аватар для Avazart
8489 / 6156 / 615
Регистрация: 10.12.2010
Сообщений: 28,683
Записей в блоге: 30
04.11.2014, 10:50
Студворк — интернет-сервис помощи студентам
Цитата Сообщение от Алексей1990 Посмотреть сообщение
то они в папке
А подумать?
0
Эксперт Pascal/Delphi
 Аватар для droider
4894 / 2827 / 867
Регистрация: 04.10.2012
Сообщений: 10,279
04.11.2014, 12:13
Цитата Сообщение от Алексей1990 Посмотреть сообщение
появляется ошибка
я на XE5 тоже проверил. Никаких проблем, библиотек не требует. Без понятия, что у Вас там происходит.


Цитата Сообщение от Алексей1990 Посмотреть сообщение
эти pcrelib.dll libeay32.dll ssleay32.dll то они в папке
в папке с проектом или в папке с exe файлом?
0
844 / 739 / 342
Регистрация: 22.09.2012
Сообщений: 5,034
04.11.2014, 14:00
Алексей1990,
Скачай другие dll- ки, они не все подходят, учитывать нужно разрядность операционной системы, либо 32, либо 64.
http://indy.fulgan.com/SSL/
1
5 / 5 / 0
Регистрация: 13.04.2013
Сообщений: 67
04.11.2014, 14:37
Цитата Сообщение от NIKOLAYY Посмотреть сообщение
Скачай другие dll- ки, они не все подходят, учитывать нужно разрядность операционной системы, либо 32, либо 64.
да dll ки скачал другие и письмо отправилось, все заработало )))) а без dll можно сделать ???
0
844 / 739 / 342
Регистрация: 22.09.2012
Сообщений: 5,034
04.11.2014, 15:07
Цитата Сообщение от Алексей1990 Посмотреть сообщение
а без dll можно сделать ???
Раньше можно было, но сейчас это небудет работать практически в любом почтовике. Изменения происходят каждый месяц смотри скрин или читай яаще последние обновления своего почтовика, поэтому я неудивлюсь если там произойдут изменения и твоя прога снова скоро откажет.

Но есть люди не понимают этого, у них ранее все работало:
Цитата Сообщение от AndHacker Посмотреть сообщение
NIKOLAYY, это не зависит от версии Indy, ранее всё работало.
И им бесполезно что то обьяснять.
Миниатюры
Не отправляется e-mail  
0
844 / 739 / 342
Регистрация: 22.09.2012
Сообщений: 5,034
04.11.2014, 15:09
Удалил
0
Эксперт С++
 Аватар для Avazart
8489 / 6156 / 615
Регистрация: 10.12.2010
Сообщений: 28,683
Записей в блоге: 30
04.11.2014, 15:20
Цитата Сообщение от Алексей1990 Посмотреть сообщение
а без dll можно сделать ???
Нет.
0
844 / 739 / 342
Регистрация: 22.09.2012
Сообщений: 5,034
04.11.2014, 15:27
Я че хотел сказать, работа твоей программы зависит не от тебя, а от того как стал работать тот сервер на котором у тебя почтовик. Возможно через какое-то время и dll- ки прийдется обновлять снова.
0
Эксперт Pascal/Delphi
 Аватар для droider
4894 / 2827 / 867
Регистрация: 04.10.2012
Сообщений: 10,279
04.11.2014, 16:34
Цитата Сообщение от Алексей1990 Посмотреть сообщение
письмо отправилось, все заработало
да неужели? Наконец-то

Добавлено через 6 минут
Цитата Сообщение от NIKOLAYY Посмотреть сообщение
работа твоей программы зависит не от тебя
Да, конечно. Теперь это его программа
1
5 / 5 / 0
Регистрация: 13.04.2013
Сообщений: 67
16.11.2014, 17:21
Кстати нашел вариант как сделать отправку почты без dll ))))) регаем хостинг заводим почту и все будет отправляться через 25 порт без dll
0
Надоела реклама? Зарегистрируйтесь и она исчезнет полностью.
BasicMan
Эксперт
29316 / 5623 / 2384
Регистрация: 17.02.2009
Сообщений: 30,364
Блог
16.11.2014, 17:21

Не отправляется сообщение на e-mail
Ребята.. нужно научиться отправлять сообщение на e-mail через яндексовский SMTP Вот код по событию нажатия на кнопку: string...

Почему не отправляется e-mail?
Почему не отправляется сообщение? Ошибка: An unhandled exception of type 'System.Net.Mail.SmtpException' occurred in System.dll ...

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

Database Mail - не отправляется почта
Здравствуйте! MS SQL2017 Не могу отправить почту с помощью DatabaseMail. Не отправляются и тестовые сообщения. Запрос EXEC...

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


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

Или воспользуйтесь поиском по форуму:
50
Ответ Создать тему
Новые блоги и статьи
Запустил конкурс "тем и промптов для текстовых квестов созданных почти чисто ИИ"
Adler 06.10.2026
Всем привет! За последние три-четыре дня я создал более 16 текстовых квестовых игр используя преимущественно по одному запросу к ИИ на игру. Мне так понравилось смотреть все ветки/ сцены во всех. . .
ИИ не может найти нужный язык в списке
Supersumestria 05.10.2026
Я ему даю вот такое изображение и прошу найти и подчеркнуть немецкий язык. Возвращает он вот это: https:/ / i. **********/ vqBWLe2. png Нужную строчку в 3й колонке просто выдумал. . Это. . .
Новая последняя моя музыка в SUNO
zorxor 05.10.2026
Здравствуйте, дорогие мои друзья! С большой радостью я хотел бы представить вам свою новую последнею музыку, которую сгенерировала мне по моей просьбе нейросеть SUNO. С уважением, zorxor. Это. . .
Программный домашний кинотеатр
russiannick 27.09.2026
Сподобился на программный домашний кинотеатр. В качестве ЯВУ по традиции выбрал js. В помощники взял Яндекс-Алису. Было создано три зала на разные интересы. исторические и ретро сериал Хичкок. . .
Беседа с ИИ о программистах, недопускающих к созданию и правке кода генеративные ИИ и причины этого
zorxor 21.09.2026
Раньше я радовался или получал некоторые эмоции, пусть небольшие, но всё же, от самого процесса написания кода, рекомпиляции и запуска, видя постепенное развитие программы и прочее. А теперь лень. . .
Мобильное приложение ColorStep
pavlinmavlin 17.09.2026
Реализовал приложение Красный, Зеленый, Синий в Unity3d + c#. Название изменил на ColorStep. Приложение прошло модерацию и теперь доступно для скачивания. Делал его сам, шаг за шагом — и вот,. . .
Запрет дублирования строк в табличной части
Maks 13.09.2026
Реализация из решения ниже выполнена на нетиповом справочнике "Нормы ТО" с табличной часть "Виды ТО", разработанного в КА2, со следующими реквизитами: - ВидТО (СправочникСсылка. ВидыТО); - ВидГСМ. . .
Скрипты Tampermonkey для CyberForum, ChatGPT, Claude и пр.
Jin X 06.09.2026
Скрипты Tampermonkey для CyberForum, ChatGPT, Claude и пр. Работая с форумом и нейросетями в браузере часто хочется что-то подкорректировать или добавить какого-то функционала. Ниже прикреплён. . .
КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin
Copyright ©2000 - 2026, CyberForum.ru