опубликован 20-01-2001 20:58 MSK        

---

посылаю мыло из этой проги.
на адреса одного сервера письма идут.
а на другие дает ошибку 503 RCPT (recipient).
в чем дело?

if NMSMTP1.Connected then
NMSMTP1.Disconnect
else
begin
NMSMTP1.Host := '192.168.0.1';
NMSMTP1.UserID := 'bvahan';
NMSMTP1.Connect;
end;
with nmsmtp1.postmessage do
begin
Subject:='test';
FromName:='bvahan';
FromAddress:='bvahan@insa.arminco.com';
Body.Text:='proverka3 ';
ToAddress.text:='sghaik@hragir.aua.am';
end;
nmsmtp1.SendMail;

опубликован 22-01-2001 23:13 MSK            

---

Код записан неверно!!!
if NMSMTP1.Connected then
NMSMTP1.Disconnect
else
begin
NMSMTP1.Host := '192.168.0.1';
NMSMTP1.UserID := 'bvahan';
NMSMTP1.Connect;
ошибка->>>end;
with nmsmtp1.postmessage do
begin
Subject:='test';
FromName:='bvahan';
FromAddress:='bvahan@insa.arminco.com';
Body.Text:='proverka3 ';
ToAddress.text:='sghaik@hragir.aua.am';
end;
nmsmtp1.SendMail;

"end" недолжно стоять там так как нужно исполнять все функции если не NMSMTP1.Connected!!!, если исполнять часть функции будет попытка отправить инфу в режиме offline