![]() |
| ||
|
|
Новости |
Поиск |
FAQ |
Статьи |
Книги |
Новости VCL
| | Форумы ЧАТ |
Орешник |
|
| |||
| |||
« предыдущая ветвь | форум | следующая ветвь »
2 месяца не могу понять в чём ошибка?!?!? [D6, WinXP]
Новочеркасский Волк © (2006-03-18 16:25:00)Здравствуйте. Я использую в своей программе следующий код:
-----------------------------------------------------------------
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"Хэлп майл ру" Почему что нетак??? Подскажите!!! Меня это уже 2 месяца гложит.
--------------------------------------------------------------
Заранее всем спасибо!!!
Volf_555 (2006-03-19 15:03:00) [1]У меня была подобная ситуация.
Раньше авторизация производилась по IP и MAC - адресам
А потом - по логину и паролю
Но ситуация всё-равно не разрешилась...
Новочеркасский Волк (2006-03-19 14:11:00) [2]Я то понимаю что он требует. И я вроде авторизируюсь. И всё равно менял строку
AuthenticationType:=atNone;наAuthenticationType:=atLogin;И всё равно таже ошибка!!! Вот даже у себя можеш попробовать.
--------------------------------------------------------------
Заранее всем спасибо!!!
Dmitrij_K (2006-03-18 17:53:00) [3]Сервер требует авторизацию. Андерстенд?
Dmitrij_K (2006-03-18 17:50:00) [4]Купи Англо-Русский словарь
> Users in your domian are not allowed to send email without
> authorization/See"Хэлп майл ру"