Текущий архив: 2003.03.27;
Скачать: CL | DM;

Вниз

Почта с Indy.   Найти похожие ветки 

← →
andrey_pst ©   (2003-02-05 08:51) [0]

Я дико извиняюсь, объясните дураку,
как добавить файл-вложение в письмо
при отправке эл.почты с помошью компонентов Indy.
(последовательность действий в общих чертах, если не сложно)

Заранее спасибо.

---

← →
shiling   (2003-02-05 09:07) [1]

Вырезка из кода...

var
FileName: string;
idSMTP : TIdSMTP;
idMessage : TIdMessage;
boolFl : boolean;
begin
FileName:=....;
idSMTP:=TIdSMTP.Create(self);
idSMTP.Host:=...;
idSMTP.Port:=...;
idMessage:=TidMessage.Create(self);
idMessage.Date:=now();
idMessage.From.Address:=.....;
idMessage.Sender.Address:=.....;
idMessage.Subject:=.....;
idMessage.Recipients.EMailAddresses:=....;
idMessage.Body.Add(fmEmail.fBody.text);
TidAttachment.Create(idMessage.MessageParts,FileName);// <---
Screen.Cursor:=crSqlWait;
idSMTP.Connect(5000);
idSMTP.Send(idmessage);
idSMTP.Disconnect;
Screen.Cursor:=crDefault;
end;

---

Страницы: 1 вся ветка

Текущий архив: 2003.03.27;
Скачать: CL | DM;

Наверх

Память: 0.46 MB
Время: 0.048 c