[PhoeniX]

Приветствую.

Решил я в одну свою апликуху добавить самопальный крэшрепортер. Заводить для этого скрипты на сервере не хочу, поэтому было решено слать дампы на моё мыло. Одно но - авторизация. Будет очень не круто, если прогу вскроют и вытащат пароль, пусть даже от левого мыла, с которого только отправка. В общем, проблему я решил использованием IdSMTPRelay:

Код:

var
  m: TIdMessage;
  r: TIdSMTPRelay;
begin
  // Init
  r := TIdSMTPRelay.Create;
  r.DNSServer := '8.8.8.8';
  m := TIdMessage.Create;
  m.From.Text := 'dump@'+GetComputerName;
  m.Recipients.Add.Address := 'мой@мейл.ру';
  m.Subject := GetComputerName+'''s dump';
  // Base information
  m.Body.Add('OS: '+GetOSVer);
  m.Body.Add('IE: '+GetIEVer);
  m.Body.Add('PC Name: '+GetComputerName);
  m.Body.Add('Username: '+GetUserName);
  // ...
  // Send
  r.Send(m);
  m.Free;
  r.Free;
end;

Всё хорошо, паролей не нужно, однако столкнулся я с тем, что яндекс (чьими почтовыми услугами я пользуюсь) стал режектить мою почту. Причём абсолютно внезапно - перестало работать в момент очередного тестового прогона, когда я приаттачил очередной файл. Выпадает ошибка

Код:

451 Service temporary unavailable. Please, come back later.

И это temporary - несколько часов подряд. Причём почта ходит, то-есть MX работает.

В общем, вот. Как с этим бороться?

P.S. В процессе написания этого поста проверил ещё раз - письмо ушло. Перед тем как начать писать проверял - была ошибка. Круто...