Открываем почту и заполняем поля на автомате

В этом уроке я покажу вам, как открыть почтовую программу установленную в системе по умолчанию и на автомате заполнит необходимые поля для отправки сообщения (кому, копия, текст сообщения).

Ну что поехали... Я надеюсь что Delphi у вас уже открыт, поэтому сразу создаем новый проект и кидаем на форму один компонент Button с закладки Standard. Больше на форме у нас ничего не будет.

Теперь переходим в код и добавим в раздел uses модуль ShellApi. Дальше, создаем обработчик событий на кнопке, между begin и end прописываем вот такой код:


ShellExecute(GetDesktopWindow,'open',  
'mailto:Имя получателя <yourmail@mail.ru>'+  
'?Subject=Тема'+  
'&Body=Текст сообщения'+  
'&CC=Копия'+  
'&BCC= Скрытая копия',  
0,0,SW_SHOWNORMAL);  
</yourmail@mail.ru>  

Запускаем - тестим - улыбаемся )

Вот и всё, в моём The Bat код работает !
Теги:
почта
Добавлено: 31 Июля 2018 22:00:53 Добавил: Андрей Ковальчук Нравится 0
Добавить
Комментарии:
Нету комментариев для вывода...