Показать сообщение отдельно

  #3203  
Старый 01.04.2009, 13:30
Dr.Gonzo
Познающий
Регистрация: 26.02.2009
Сообщений: 34
С нами: 9054709

Репутация: 18
По умолчанию

Народ! Не знаю куда запостить, не злитесь, если не туда.
Нужно разослать письмо в html-формате с аттачем.
Решил всё делать на indy в Delphi7
Возникло 2 проблемы:

1. Нужно менять строку отправителя, а так как я авторизуюсь на сервере mail.ru, то он не дает писать от чужого имени. Может кто знает, есть ли хосты, не требующие ввода логина и пароля?
Код:
  smtp.Host:='smtp.mail.ru';
  smtp.AuthenticationType := atLogin;
  smtp.Port:=25;
  smtp.Username:='********';
  smtp.Password:='*********';
2. Не могу сделать, чтобы письмо было в html-формате, если прикрепляю аттач, то письмо идет, как plaintext, если убираю строку вставки аттача, то всё нормально:
Код:
 Msg.ClearBody;
 TIdAttachment.Create(Msg.MessageParts, 'C:\1.txt');
  Msg.Body.Add ('Zdes<br>html');
  TidText.Create( Msg.MessageParts,  Msg.Body);
  Msg.MessageParts.Items[0].ContentType := 'application/octet';
  Msg.MessageParts.Items[1].ContentType := 'text/html';
 Msg.ContentType := 'multipart/mixed';
  Msg.CharSet:= 'Windows-1251';
  Msg.Encoding:= meMIME;
 
Ответить с цитированием