TidSMTP. Ошибка: failed to run checks

← →
Alex_Petr © (2004-11-16 13:32) [0]

Возникает после события SMTPWorkEnd перед вызовом Disconnect.
Чем может быть вызвана эта ошибка ?

← →
Alex_Petr © (2004-11-17 10:02) [1]

Неужели никто с этим не сталкивался ?

← →
Erik1 © (2004-11-17 17:04) [2]

А зачем тебе событие перехватывать? Попробуй без него.

← →
Alex_Petr © (2004-11-18 00:55) [3]

Да ничего я не перехватываю, просто
Log веду. Замучило уже. Главное: не понятно в чем ошибка.

← →
Erik1 © (2004-11-18 10:59) [4]

Лог по другому делается, а у тебя спрашивали чтобы выяснить неделаеш ли ты какието ошибки в обработке события и версию Indy скажи, Delphi тоже, OS также незабудь.

← →
Alex_Petr © (2004-11-19 07:23) [5]

Indy version 9.0
D7
Win XP SP1

← →
Alex_Petr © (2004-11-19 07:42) [6]

Сама процедура:
procedure Indy_SendMail(const sSubj,sTo,sFromAddr,sReplyTo,sAttach:string;LBody:TStrings); var FidMess:TidMessage; Fid_SMTP:TidSMTP; begin try Fid_SMTP:=TIdSMTP.Create(Application.MainForm); FidMess:=TIdMessage.Create(Fid_SMTP); except if Fid_SMTP<>nil then FreeAndNil(Fid_SMTP); end; with FidMess do begin Subject:="Test"; From.Text:=sFromAddr; Recipients.EMailAddresses:=sTo; if LBody<>nil then Body.Text:=LBody.Text; if sReplyTo<>"" then ReplyTo.Add.Text:=sReplyTo; if FileExists(sAttach) then TIdAttachment.Create(MessageParts,sAttach); end; with Fid_SMTP do begin ReadTimeout:=60000; MailAgent:="TIdSMTP"; AuthenticationType:=atLogin; UserName:=sFromAddr;//Так требуют на mail.ru Password:="My Password"; Host:="smtp.mail.ru"; if Connected then try Connect; Send(FidMess); finally if Connected then Disconnect; FreeAndNil(FidMess); FreeAndNil(Fid_SMTP); end; end; end;

← →
Verg © (2004-11-19 09:47) [7]

> if Connected then> try
> Connect;

Ну и что даст эта проверка?

← →
Verg © (2004-11-19 09:49) [8]

Дагадаться несложно - ничего никогда отправлено не будет + мемлик.

← →
vuk © (2004-11-19 11:27) [9]

Если не ошибаюсь, то "failed to run checks" - это ругань почтовика, поэтому нужно смотреть документацию по сообщениям об ошибках используемого почтового сервиса.

Извините: это описка.
В программе так:
if not Connected then

>vuk
> "failed to run checks" - это ругань почтовика
Я тоже так думаю.
А где эту документацию можно посмотрнеть ?
На mail.ru я ничего не нашел.

to Alex_Petr © (19.11.04 12:28) [11]:
>А где эту документацию можно посмотрнеть ?
>На mail.ru я ничего не нашел.
Если это mail.ru, то я не знаю. Может быть написать им в службу поддержки?

Кто знает, танец с бубном вокруг компа,
надо устраивать ровно в полночь, или
можно в другое время ?

TidSMTP. Ошибка: failed to run checks Найти похожие ветки