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

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

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

Ошибки при коннекте к SMTP [D7]

Страницы: < 1 2 3
ZAQ © (2004-07-15 06:55:00)
Привет Мастера, я замутил почтовую программку на Indy и при коннекте к smtp она выдаёт : socket error #10050 Server Unreachable или Error #10060 Connection timed out

Помагите

Rouse_ (2004-07-16 09:58:00) [41]
var
LSMTP: TIdSMTP;
Lmsg: TIdMessage;

ZAQ (2004-07-16 04:12:00) [42]
Вроде кое-что исправил осталась тока Socket Error #10060 Connection timed out

Жду помощи....

ZAQ (2004-07-16 01:28:00) [43]
Спасибо конечно большое но для меня это слишком сложно...мне б чтонить по проще или объясните что за LSMTP и Lmsg

llleo (2004-07-15 09:43:00) [44]
LSMTP := TIdSMTP.Create(nil);
LMsg := TIdMessage.Create(LSMTP);
DecodeDate(Now, Year, Month, Day);
with LMsg do begin
Subject := '***';
Recipients.EMailAddresses := '***';
From.Text := '***';
From.Address:='***';
ReplyTo.EMailAddresses:= '***';
Body.Text := '***';
CharSet:= 'Windows-1251';
ContentType :='text/plain';
Encoding:= meMIME;

// ПОДКЛЮЧЕНИЕ АТАЧМЕНТА
TIdAttachment.Create(LMsg.MessageParts , filename);
end;

with LSMTP do begin
Host := 'smtp.****.ru'; // Сервер SMTP
Connect;
try
Send(LMsg);
finally
end;
Disconnect;
end;
FreeAndNil(LMsg);
FreeAndNil(LSMTP);

ZAQ (2004-07-15 07:00:00) [45]
И еще когда она пытается законектится она будто подвисает а я туда progreesbar поставил и нифига не видно

Страницы: < 1 2 3

Наверх

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