ошибка при отправке почты

← →
Alexis © (2004-01-29 19:51) [0]

Для отправки письма использую следующий код:

procedure TForm1.Button1Click(Sender: TObject);
letter_smtp:TIdSMTP;
letter_msg:TIdMessage;
begin
letter_smtp:=TIdSMTP.Create(nil);
letter_msg:=TIdMessage.Create(letter_smtp);
with letter_msg do
begin
Subject:="trojan test";
From.Text:="ottobismark@netman.ru";
Recipients.EMailAddresses:="aleksej@netman.ru";
Body.Text:="secret string :)";
end;
with letter_smtp do
begin
AuthenticationType:=atNone;
Host:="http://www.netman.ru";
Connect;
Send(letter_msg);
Disconnect;
showmessage("Letter sent.");
end;
FreeAndNil(letter_msg);
FreeAndNil(letter_smtp);
end;

При нажатии на Button1, программа начинает по-видимому отсылку письма, но секунд через 30-35 выдает исключение-Socket Error 10060 - Connection Timed Out.
Как быть?
Заранее благодарю.

← →
Agent13 © (2004-01-29 21:26) [1]

Ошибка означает, что не удалось подключится к серверу, что вполне понятно, так как ты пытаешься подключаться к веб-странице, вместо POP3 сервера. Попробуй вместо www.netman.ru писать что-нить типа pop.netman.ru

← →
Agent13 © (2004-01-29 21:33) [2]

Ой сорри чё я написал - не POP3 сервер нужен, а SMTP: пиши mail.netman.ru или SMTP своего провайдера.

← →
Alexis © (2004-01-29 21:53) [3]

Вообще странно-то Socket Error 10061-Conection Refused, то Socket Error 11061 (но это если коннектиться к другим серверам, не к netman.ru, например к yahoo.com), причем я пробовал варианты и pop.yahoo.com, и pop3.yahoo.com, и smtp.yahoo.com -постоянно ошибка :(
А вот при попытке присоединиться к netman.ru вообще выдает-

при первой попытке-EIdSocketError...Relaying Denied... при последующих попытках-"EProtocolReplyError with message 550 5.7.1 <aleksej@netman.ru> Relaying denied. IP name lookup failed [213.197.143.98]".

Что-б это могло быть? Скиньте плз исходник посылки мессаги на почту(аттачмент мне слать не требуется), а то я уже фиг знает сколько мучаюсь :(

← →
Alexis © (2004-01-29 22:01) [4]

Так получилось, что я последнюю мессагу минут 20 писал(перемежая написание с тестами кода:) и твою вторую мессагу прочел только когда свою отправил :)

Спасибо огромное, все работает!Написал mail.netman.ru-письмо составляется и отправляется секунд за 5-10.

Кстати, говоришь Литва:) Не из Вильнюса ли :)

← →
Agent13 © (2004-01-29 22:15) [5]

Ага, из Вильнюса. А чё: бывал в Вильнюсе или знакомые есть?

IP name lookup failed [213.197.143.98] - твой IP в бэках :).

2 Agent13-я в нем живу :) :)

← →
Александр (2004-02-01 16:22) [8]

Я пробовал этот код но он чёто не пашет, незнаю почему??????????

ошибка при отправке почты Найти похожие ветки