VPF::письма по внутренней почте - Форум программистов

Тиль

Дата 10.11.2008, 13:57 (ссылка)

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

Загрузка ...

Бывалый

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

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

У нас тоит почтовый сервер в локальной сети. Пытаюсь с помощью Дельфи 7 отправить письмо-выдает ошибку. Что может быть не так?

Код


procedure TForm1.Button1Click(Sender: TObject);
begin
  IdSMTP1.Host:='tempsrv.oas';
  IdSMTP1.Port:=25;   
  IdSMTP1.Username:='Till';
  IdSMTP1.Password:='Qwerty12';
  IdSMTP1.AuthenticationType:=atLogin;
   with IdMessage1 do
     begin
      Body.Assign(Memo1.Lines);
      From.Name:='Тиль';  
      From.Address:= '[email protected]';
      Recipients.EMailAddresses :='[email protected]'; 
      Subject := 'Привет!';
      end;
   IdSMTP1.Connect;
   try
   IdSMTP1.Send(IdMessage1);
   finally
   IdSMTP1.Disconnect;
   end;
showmessage('Сообщение отправлено.');
end;

end.

Ошибка :Software caused connection abort. Как будто не коннектится...что делать?

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

Казалось нам пипец, оказалось что не казалось

Matematik

Дата 10.11.2008, 20:38 (ссылка)

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

Загрузка ...

Эксперт

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

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

Вроде код правильный.
Обычная почтовая программа с точно такими же параметрами отправляет?

Тиль

Дата 11.11.2008, 07:26 (ссылка)

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

Загрузка ...

Бывалый

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

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

ага

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

Казалось нам пипец, оказалось что не казалось

Matematik

Дата 11.11.2008, 12:06 (ссылка)

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

Загрузка ...

Эксперт

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

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

У меня, этот же код отправляет на smtp.mail.ru:25
Есть несколько вариантов
- блокирует файрвол или что-то подобное
- вы ошиблись и параметры отправли другие (например связь по защищенному каналу SSL/TLS или просто опечатка)
- глюк indy, имхо это маловероятно

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