Модераторы: Snowy, Poseidon, MetalFan

Поиск:

Ответ в темуСоздание новой темы Создание опроса
> отправка почты smtp, отправка почты smtp 
V
    Опции темы
larinva
Дата 26.10.2009, 10:55 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Опытный
**


Профиль
Группа: Участник
Сообщений: 294
Регистрация: 24.7.2006

Репутация: нет
Всего: 1
Подскажите, где ошибка при нажатии на кнопку выводится следующее сообщение user posted image
Код

procedure TForm1.Button1Click(Sender: TObject);

var Msg:TMessage;
begin
IdSMTP1.Port:=25;
IdSMTP1.Host:='smtp.fmail.ru';
IdSMTP1.Connect('5000');
//авторизация с сервером smtp
IdSMTP1.Authenticate:=atDefault;
IdSMTP1.Username:='[email protected]';
IdSMTP1.Password:='111111';
//проверяем установлено ли соединение если да то отправляем письмо
if IdSMTP1.Connected=true then
begin
  IdSMTP1.Send(IdMessage1);
  IdMessage1.Subject:='Нет файлов для отправки на склад'; //текст темы сообщения
  IdMessage1.Recipients.EMailAddresses:='[email protected]'; //адрес получателя
  IdMessage1.From.Address:='[email protected]'; //автор письма
  IdMessage1.Body.Text:='Нет файлов для отправки на склад'; //текст письма
  IdMessage1.Date:=StrToDate('26.10.2009');

end;
end;


Это сообщение отредактировал(а) larinva - 26.10.2009, 10:56
PM MAIL   Вверх
larinva
Дата 26.10.2009, 13:32 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Опытный
**


Профиль
Группа: Участник
Сообщений: 294
Регистрация: 24.7.2006

Репутация: нет
Всего: 1
Ау народ тут есть кто?
PM MAIL   Вверх
Alca
Дата 26.10.2009, 13:34 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Эксперт
****


Профиль
Группа: Завсегдатай
Сообщений: 3993
Регистрация: 14.6.2006

Репутация: 1
Всего: 50
Есть.  smile

Добавлено через 38 секунд
Попробуй отправить через telnet


--------------------
C++ cross-platform library
PM WWW ICQ Skype Jabber   Вверх
larinva
Дата 26.10.2009, 14:11 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Опытный
**


Профиль
Группа: Участник
Сообщений: 294
Регистрация: 24.7.2006

Репутация: нет
Всего: 1
через телнет отзывается
в коде у меня все правильно?

Это сообщение отредактировал(а) larinva - 26.10.2009, 14:11
PM MAIL   Вверх
Alca
Дата 26.10.2009, 14:22 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Эксперт
****


Профиль
Группа: Завсегдатай
Сообщений: 3993
Регистрация: 14.6.2006

Репутация: 1
Всего: 50
Цитата

в коде у меня все правильно?

вроде да

Добавлено через 10 минут и 57 секунд
попробуй айпишник забить


--------------------
C++ cross-platform library
PM WWW ICQ Skype Jabber   Вверх
larinva
Дата 26.10.2009, 14:35 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Опытный
**


Профиль
Группа: Участник
Сообщений: 294
Регистрация: 24.7.2006

Репутация: нет
Всего: 1
и через ip пробовал
PM MAIL   Вверх
Alca
Дата 26.10.2009, 14:39 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Эксперт
****


Профиль
Группа: Завсегдатай
Сообщений: 3993
Регистрация: 14.6.2006

Репутация: 1
Всего: 50
А на другой почтовик отправляется?


--------------------
C++ cross-platform library
PM WWW ICQ Skype Jabber   Вверх
larinva
Дата 26.10.2009, 14:46 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Опытный
**


Профиль
Группа: Участник
Сообщений: 294
Регистрация: 24.7.2006

Репутация: нет
Всего: 1
это еще не пробовал
PM MAIL   Вверх
larinva
Дата 26.10.2009, 21:59 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Опытный
**


Профиль
Группа: Участник
Сообщений: 294
Регистрация: 24.7.2006

Репутация: нет
Всего: 1
Попробовал на другой отправить на mail.ru та же ошибка в чем ошибка подскажите  smile 
PM MAIL   Вверх
Alca
Дата 26.10.2009, 22:05 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Эксперт
****


Профиль
Группа: Завсегдатай
Сообщений: 3993
Регистрация: 14.6.2006

Репутация: 1
Всего: 50
Цитата

на другой отправить на mail.ru 

кроме mail.ru нет почтовиков?

Добавлено @ 22:10
Я че та не понял..............
Код

procedure TForm1.Button1Click(Sender: TObject);

var Msg:TMessage;
begin
IdSMTP1.Port:=25;
IdSMTP1.Host:='smtp.fmail.ru';
IdSMTP1.Authenticate:=atDefault;
IdSMTP1.Username:='[email protected]';
IdSMTP1.Password:='111111';
//авторизация с сервером smtp
IdSMTP1.Connect('5000');

//проверяем установлено ли соединение если да то отправляем письмо
if IdSMTP1.Connected=true then
begin
  IdMessage1.Subject:='Нет файлов для отправки на склад'; //текст темы сообщения
  IdMessage1.Recipients.EMailAddresses:='[email protected]'; //адрес получателя
  IdMessage1.From.Address:='[email protected]'; //автор письма
  IdMessage1.Body.Text:='Нет файлов для отправки на склад'; //текст письма
  IdMessage1.Date:=StrToDate('26.10.2009');

  IdSMTP1.Send(IdMessage1);

end;
end;


Добавлено @ 22:11
 smile 

Это сообщение отредактировал(а) Alca - 26.10.2009, 22:17


--------------------
C++ cross-platform library
PM WWW ICQ Skype Jabber   Вверх
Alca
Дата 26.10.2009, 22:25 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Эксперт
****


Профиль
Группа: Завсегдатай
Сообщений: 3993
Регистрация: 14.6.2006

Репутация: 1
Всего: 50
Код

IdSMTP1.Connect(); //!!!!!!!!!!!!!!!!



--------------------
C++ cross-platform library
PM WWW ICQ Skype Jabber   Вверх
larinva
Дата 26.10.2009, 22:44 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Опытный
**


Профиль
Группа: Участник
Сообщений: 294
Регистрация: 24.7.2006

Репутация: нет
Всего: 1
Цитата

кроме mail.ru нет почтовиков?
 есть fmail.ru 
Цитата

Я че та не понял..............

что не понял???
PM MAIL   Вверх
Alca
Дата 26.10.2009, 22:47 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Эксперт
****


Профиль
Группа: Завсегдатай
Сообщений: 3993
Регистрация: 14.6.2006

Репутация: 1
Всего: 50
Ты сначала отпраляешь почту, а потом создаешь почтовое сообщение... Вот этого я не понял. Это типа так задумано было?
Сначала конектишься к серваку, а потом создаешь настройки подключения..... smile 


--------------------
C++ cross-platform library
PM WWW ICQ Skype Jabber   Вверх
larinva
Дата 26.10.2009, 23:58 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Опытный
**


Профиль
Группа: Участник
Сообщений: 294
Регистрация: 24.7.2006

Репутация: нет
Всего: 1
где ты там увидел 
Цитата

Ты сначала отпраляешь почту, а потом создаешь почтовое сообщение...

С начала указываю порт 25 потом адрес smtp сервера затем авторизуюсь, коннекчусь к серваку проверяю что соединение установлено А УЖ ПОТОМ ОТПРАВЛЯЮ!!!!!!!!!!!!!!1 
PM MAIL   Вверх
Alca
Дата 27.10.2009, 00:04 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Эксперт
****


Профиль
Группа: Завсегдатай
Сообщений: 3993
Регистрация: 14.6.2006

Репутация: 1
Всего: 50
http://forum.codenet.ru/showthread.php?p=241844 smile

Добавлено через 2 минуты и 54 секунды
http://www.delphisources.ru/forum/showthread.php?p=42246


--------------------
C++ cross-platform library
PM WWW ICQ Skype Jabber   Вверх
Ответ в темуСоздание новой темы Создание опроса
Правила форума "Delphi: Сети"
Snowy
Poseidon
MetalFan

Запрещено:

1. Публиковать ссылки на вскрытые компоненты

2. Обсуждать взлом компонентов и делится вскрытыми компонентами

  • Литературу по Дельфи обсуждаем здесь
  • Действия модераторов можно обсудить здесь
  • С просьбами о написании курсовой, реферата и т.п. обращаться сюда
  • Вопросы по реализации алгоритмов рассматриваются здесь
  • 90% ответов на свои вопросы можно найти в DRKB (Delphi Russian Knowledge Base) - крупнейшем в рунете сборнике материалов по Дельфи

Если Вам помогли и атмосфера форума Вам понравилась, то заходите к нам чаще! С уважением, Snowy, Poseidon, MetalFan.
 
0 Пользователей читают эту тему (0 Гостей и 0 Скрытых Пользователей)
0 Пользователей:
« Предыдущая тема | Delphi: Сети | Следующая тема »

Подписаться на тему | Подписка на этот форум | Скачать/Распечатать тему


 




[ Время генерации скрипта: 0.0530 ]   [ Использовано запросов: 22 ]   [ GZIP включён ]


Реклама на сайте     Информационное спонсорство

 
 По вопросам размещения рекламы пишите на vladimir(sobaka)vingrad.ru
Отказ от ответственности     Powered by Invision Power Board(R) 1.3 © 2003  IPS, Inc.