Мастера DELPHI (документация, исходники, скачать)

Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

« предыдущая ветвь | форум | следующая ветвь »

ошибка при отправке почты [D6, WinME, Win2k, WinXP]

Alexis © (2004-01-29 19:51:00)
Для отправки письма использую следующий код:

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.
Как быть?
Заранее благодарю.

Александр (2004-02-01 16:22:00) [1]
Я пробовал этот код но он чёто не пашет, незнаю почему??????????

Alexis (2004-02-01 14:08:00) [2]
2 Agent13-я в нем живу :) :)

csr (2004-01-30 11:29:00) [3]
IP name lookup failed [213.197.143.98] - твой IP в бэках :).

Agent13 (2004-01-29 22:15:00) [4]
Ага, из Вильнюса. А чё: бывал в Вильнюсе или знакомые есть?

Alexis (2004-01-29 22:01:00) [5]
Так получилось, что я последнюю мессагу минут 20 писал(перемежая написание с тестами кода:) и твою вторую мессагу прочел только когда свою отправил :)

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

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

Alexis (2004-01-29 21:53:00) [6]
Вообще странно-то 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]".

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

Agent13 (2004-01-29 21:33:00) [7]
Ой сорри чё я написал - не POP3 сервер нужен, а SMTP: пиши mail.netman.ru или SMTP своего провайдера.

Agent13 (2004-01-29 21:26:00) [8]
Ошибка означает, что не удалось подключится к серверу, что вполне понятно, так как ты пытаешься подключаться к веб-странице, вместо POP3 сервера. Попробуй вместо www.netman.ru писать что-нить типа pop.netman.ru

Наверх

	« предыдущая ветвь \| форум \| следующая ветвь »