mailto:

← →
Nikolai_S © (2003-11-12 14:48) [0]

Добрый день!

У меня такой вопрос. С помощью данной функции можно вызвать окно для отправки письма через дефолтовый почтовый клиент Windows:

ShellExecute(Handle, "open", PChar("mailto:bisinfo@dubna.ru?subject=" + Application.Title), nil, nil, SW_SHOWNORMAL);

К сожалению таким образом нельзя прикрепить к письму файлы. Как можно вызвать окно почтового клиента для отправки письма и из Delphi прикрепить файл к письму?

← →
Skier © (2003-11-12 14:55) [1]

> К сожалению таким образом нельзя прикрепить к письму файлы.
> Как можно вызвать окно почтового клиента для отправки письма
> и из Delphi прикрепить файл к письму?

AFAIK, никак.

← →
Nikolai_S © (2003-11-12 15:03) [2]

Ну может быть не через mailto, а как-то по другому?

Ведь в Windows если нажать правой кнопкой мыши на файле, то в менюшке есть команда Отправить -> Адресат. Как раз происходит то что нужно: открывается окно почтового клиента с прикрепленным файлом. Как это из Delphi сотворить?

← →
Vic (2003-11-12 17:50) [3]

ShellExecute(Handle,nil,pchar("mailto:"+Recip+"?subject="+Application.Title+"&Attach=""+NamFile+"""),nil,"",0);</C ODE> где Recip - список адресов через точку с запятой, NamFile - имя файла приложенного к письму Такая схема работает уже с год, один файл отправляется точно, несколько не пробовал

2 Vic:
Увы, у меня не сработало. Я и сам так пытался раньше.

2 Anatoly Podgoretsky
А как это сделать через SimpleMAPI (или еще каким-либо другим способом). Mailto я привел лишь для примера. Каким способом реализовать - не главное. Задача - необходимо из дельфи открывать окно почтового клиента с заполненными полями "Кому", "Тема" и прикрепленным файлом.

mailto: Найти похожие ветки