VPF::Работа с SMTP протоколом - Форум программистов

sibstate

Дата 7.2.2011, 11:17 (ссылка)

(нет голосов)

Загрузка ...

Новичок

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

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

Всем доброго времени суток! Ребята у меня такая проблемка, написал почтового клиента, тестировал его в домашних условиях все отлично работало и без ошибок, а как проект привез на работу при тех же параметрах программа не смогла даже подключиться к серверу(имя сервера правильное!!!!! Дома через этот же сервак отправляет) !!! В чем проблема не понимаю smile

Исходник прилогать не буду ибо программа работает по стандарту через indy smtp 9 версии и idmessage.

Помогите пожалуйста разобраться, в чем может быть проблема? И пожалуйста объясните как решить ее.

casinosoftguru

Дата 7.2.2011, 12:32 (ссылка)

(нет голосов)

Загрузка ...

Шустрый

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

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

Если одна и та же программа по разному работает на разных компьютерах, то либо разница в сетевых настройках этих компьютеров, днс серверах (на работе суровый сисадмин например), либо ошибка в 15ой строке. smile

Это сообщение отредактировал(а) casinosoftguru - 7.2.2011, 12:32

MetalFan

Дата 7.2.2011, 13:12 (ссылка)

(нет голосов)

Загрузка ...

Аццкий Сотона

Профиль
Группа: Комодератор
Сообщений: 3815
Регистрация: 2.10.2006
Где: Moscow

Репутация: 14
Всего: 128

Зачем было создавать две темы?

По поводу проблемы - соединение с серваком по SSL/TLS?
Если да, то возможно не хватает или не подходят библиотеки OpenSSL

Это сообщение отредактировал(а) MetalFan - 7.2.2011, 17:41

--------------------

There are always someone smarter than you...

sibstate

Дата 7.2.2011, 15:38 (ссылка)

(нет голосов)

Загрузка ...

Новичок

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

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

Объясните как сделать так чтобы заработало. Вариант с днс пробовал, письма определяются как спам.

MetalFan

Дата 7.2.2011, 17:36 (ссылка)

(нет голосов)

Загрузка ...

Аццкий Сотона

Профиль
Группа: Комодератор
Сообщений: 3815
Регистрация: 2.10.2006
Где: Moscow

Репутация: 14
Всего: 128

Автор сам с собой похоже разговаривает...
Ну приятно поговорить!

--------------------

There are always someone smarter than you...

sibstate

Дата 9.2.2011, 14:14 (ссылка)

(нет голосов)

Загрузка ...

Новичок

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

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

SSL или TLS я не зная, я можно сказать не ориентируюсь в этом. Только начал работать с сетью.

Вот исходник моей программы.

Код


   try
      SMTP.Host:='mail.hc.ru';
      SMTP.Port:=25;
      SMTP.Username:= '[email protected]';
      SMTP.Password:='password';
      SMTP.AuthenticationType:=atLogin;
      SMTP.Connect;

      try
         SMTP.Send(IdMessage); // отправка письма на сервер
     except
      on E: Exception do
          //Не отправленно
      end;
      
   finally
      SMTP.Disconnect; // разрыв соединения
   end;

SMTP.Connect; Здесь вылетает ошибка 10060

Цитата

Что за 15я строка?

И еще там аутлук нормально работает.

Помогите пожалуйста бездарю smile

Вот как сделать так что бы все соединялось и отправлялось??

Mach3

Дата 17.2.2011, 08:37 (ссылка)

(нет голосов)

Загрузка ...

Бывалый

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

Репутация: -1
Всего: 2

Аналогичная проблема..
Через одного провадера отправляется, через другого- нет..
Ноут один и тот же, настройки те же. =((
Подскажите, для маил или для яндекса обязательно наличие SSL ??
------
Проверил еще на трех провайдерах..
только на одном прога выдает "connect time out"
Прога- одна кнопка и следующий код:

Код


procedure TForm1.Button1Click(Sender: TObject);
 var
mssg,recip:string;
i:integer;
begin
if form1.IdSMTP1.Connected=false then begin
form1.IdSMTP1.Host := 'smtp.qip.ru';
form1.IdSMTP1.Username:='[email protected]';
form1.IdSMTP1.Password:='password';
form1.IdSMTP1.Connect(15000);
 end;
mssg:='Test QiP SMS from ArtemKTV';
form1.idmessage1.Subject:='QiP Server';
form1.idmessage1.Recipients.EMailAddresses:='[email protected]';
form1.idmessage1.From.Address:='[email protected]';
form1.idmessage1.Body.Text:=mssg;
if form1.IdSMTP1.Connected=True then
form1.IdSMTP1.Send(form1.idmessage1);
form1.idSMTP1.Disconnect;
end;

Это сообщение отредактировал(а) Mach3 - 17.2.2011, 10:32

--------------------

Век живи - век учись...

Mach3

Дата 17.2.2011, 11:08 (ссылка)

(нет голосов)

Загрузка ...

Бывалый

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

Репутация: -1
Всего: 2

Проблему решил.. =))
год назад спамфильтр заблокировал 25 порт..
4ый звонок за день провайдеру, вынудил его поглядеть на траблу.. =))
всем спасибо..

--------------------

Век живи - век учись...

MetalFan

Дата 17.2.2011, 11:26 (ссылка)

(нет голосов)

Загрузка ...

Аццкий Сотона

Профиль
Группа: Комодератор
Сообщений: 3815
Регистрация: 2.10.2006
Где: Moscow

Репутация: 14
Всего: 128

Mach3, некоторые провайдеры блокируют smtp протокол... сталкивался с таким.

--------------------

There are always someone smarter than you...

0 Пользователей читают эту тему (0 Гостей и 0 Скрытых Пользователей)
0 Пользователей:
« Предыдущая тема \| Delphi: Сети \| Следующая тема »