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

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

Проблема с прекреплением attachment [D6, WinXP]


dort12 ©   (2009-05-22 13:03:00) 

Доброго времени суток!!! Господа такая проблема... Программно вызываю запуск почтового приложения, но вот ни как не могу прикрепить к нему файл
Вот что уже есть может я туплю:
procedure TForm1.Button2Click(Sender: TObject);
var
 EMailDestinationString, SubjectString, Line1String,
   Line2String, mailstring: string;
  attachmentfile:file;
begin
 EMailDestinationString := '';
 SubjectString := '';
 Line1String := '';
 Line2String := '';
 attachmentfile:= 'C:\LAN.txt';
  mailstring := 'mailto:' + EMailDestinationString +
   '?subject=' + SubjectString +
   '&body=' + Line1String +
   '%0d' + Line2String + '%attachment= '+attachmentfile;
 if (ShellExecute(0, 'open', PChar(mailstring), '', '',
   SW_SHOWNORMAL)


clickmaker   (2009-05-22 16:36:00) [1]

> Вряд ли можно таким образом послать письмо со вложением

thunderbird.exe -compose to=***@***,subject='тема',body='тело',attachment='c:\pagefile.sys'

TheBat, говорят, тоже умеет. Хотя, в последних версиях возможно убрали


palva   (2009-05-22 15:37:00) [2]


> через командную строку далеко не все почтовики воспринимают аттачи.

Вряд ли можно таким образом послать письмо со вложением. Если бы это было возможно, то это была бы дыра в безопасности. Представьте себе интернет-страничку со ссылкой mailto, которая посылает содержимое критических файлов по адресу, указанному автору странички. Если ваша программа имеет в своем распоряжении адрес smtp сервера, логин и пароль, тогда другое дело. Тогда вы можете послать, но не через протокол mailto:, а через какой-нибудь Indy или winsock


clickmaker   (2009-05-22 13:39:00) [3]

> [2] dort12   (22.05.09 13:16)

через командную строку далеко не все почтовики воспринимают аттачи.
лучше обратить свой взор в сторону Simple MAPI


Сергей М.   (2009-05-22 13:22:00) [4]


> есть предложения?


Есть - привести в сооответствие формальный и фактический типы данных.

Тип file - это не тип string


dort12   (2009-05-22 13:16:00) [5]

Согласен..... есть предложения??


Сергей М.   (2009-05-22 13:12:00) [6]


> attachmentfile: file;


> attachmentfile:= 'C:\LAN.txt';


Что за абсурд ?
И причем тут "Сети" ?


Наверх

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