Подскажите как отправить данные из Dbgrid через Outlook?

← →
49 Cent (2006-01-27 17:09) [0]

Есть Adotable и связанный с ним Dbgrid. В Dbgrid отображаются данные об отгрузке. Т.е указан список клиентов и материалы, которые идут к клиенту. Идея такая! Необходимо отправить через Outlook, каждому клиенту информацию о том, что ему идет. Половина алгоритма понятна! Через фильтр оставляем определенного клиента и дальше необходимо отправить отфильтрованную информацию через Outlook в виде письма с вложением. И вот этом проблема! Т.е в конечном счете необходимо создать в Outlook сообщение, в это сообщение вложить созданный файл и отправить его по определенному адресу и при это важно чтобы отправленное сообщение осталось в отправленных "Оутлука".

Зы. Я нашел пример, но там используется некий MailItem1 с закладки Servers, но в 7Делфи нет такого компонента. Есть какие другие способы?

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

← →
49 Cent (2006-01-27 17:50) [1]

Нашел такой код!

> var
> OleOutlook,myAttachments,myAttachment: Variant;
> myitem:Variant;
> begin
> OleOutlook := CreateOleObject("Outlook.Application");
>
> myItem := OleOutlook.CreateItem(0);
> myItem.To := "somemail@somewhere.ru";
> myItem.Subject := "Test My Mail";
> myItem.Body := "Test My Mail";
> myAttachments := myItem.Attachments;
> myAttachment := myAttachments.Add("C:\1.txt");
> myItem.Send;

С помощью этого кода отправляет файл через Outlook, а мне необходимо через Outlook Express. Как это исправить?

Подскажите как отправить данные из Dbgrid через Outlook? Найти похожие ветки