Приветствую.
Решил я в одну свою апликуху добавить самопальный крэшрепортер. Заводить для этого скрипты на сервере не хочу, поэтому было решено слать дампы на моё мыло. Одно но - авторизация. Будет очень не круто, если прогу вскроют и вытащат пароль, пусть даже от левого мыла, с которого только отправка. В общем, проблему я решил использованием 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. В процессе написания этого поста проверил ещё раз - письмо ушло. Перед тем как начать писать проверял - была ошибка. Круто...