Top.Mail.Ru
Мастера DELPHI, Delphi programming community Титульная страница Поиск, карта сайта Написать письмо 
| Новости | Поиск | FAQ | Статьи | Книги | Новости VCL |
| Форумы ЧАТ | Орешник | KOL и MCK |
Форумы -» Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

« предыдущая ветвь | форум | следующая ветвь »

отправка почты с прикреплёнными файлами


ALEKCEY ©   (2005-08-24 09:33:00) 

Доброе время суток.
Пожалуйста не надо кидать камнями, но я перерыл весь форум но ничего подходящего не нашёл :(
цель такая надо отправка почту с прикреплённым файлом используя Indy 10. я дохосделал вот что, точнее списал

IdMessage1.Recipients.EMailAddresses:='*****@bk.ru';
IdMessage1.From.Text:='****@bk.ru';
IdMessage1.Body.Text:='SMTPBODYTEXT';
IdMessage1.Subject:='SMTPSUBJECT';
IdSMTP1.Host:='smtp.mail.ru';
IdSMTP1.Connect;
Application.ProcessMessages;
IdMessage1.Body.Text:='SMTPBODYTEXT';
TIdAttachment.Create('C:\csb.log'); // всё великолепно если убрать эту строку, но как тогда прикрепить фаил????
try
 IdSMTP1.Send(IdMessage1);
finally
 IdSMTP1.Disconnect;
 IdMessage1.MessageParts.Clear;
end;

в коде пометка где проблемма, если нетрудно, помогите!


stone   (2005-08-24 09:53:00) [1]

TIdAttachment.Create(IdMessage1.MessageParts, 'C:\csb.log');


Наверх

Титульная страница Поиск, карта сайта Написать письмо