IPB
ЛогинПароль:

> Внимание!

1. Пользуйтесь тегами кода. - [code] ... [/code]
2. Точно указывайте язык, название и версию компилятора (интерпретатора).
3. Название темы должно быть информативным.
В описании темы указываем язык!!!

Наладить общение поможет, если вы подпишитесь по почте на новые темы в этом форуме.

> Отправка почты, С++
сообщение
Сообщение #1


Новичок
*

Группа: Пользователи
Сообщений: 11
Пол: Мужской
Реальное имя: Дмитрий

Репутация: -  0  +


Добрый день.
Подскажите, пожалуйста, как реализуется процесс отправки почты в среде С++ Builder.

Хотелось бы, чтобы при нажатии кнопки отправлялось письмо с заданной темой через почтовый клиент (например, Outlook) на уже назначенный адрес. К письму должен быть прикреплён конкретный txt-файл, сформированный программой ранее.

Заранее спасибо.
 Оффлайн  Профиль  PM 
 К началу страницы 
+ Ответить 
 
 Ответить  Открыть новую тему 
Ответов
сообщение
Сообщение #2


Гость






С Аутлуком вполне можно работать через Ole Automation:
void __fastcall TForm1::Button1Click(TObject *Sender)
{
const int olMailItem = 0;

Variant MSOApp = CreateOleObject("Outlook.Application");
try
{
Variant myItem = MSOApp.OleFunction("CreateItem", (Variant)olMailItem);

myItem.OlePropertySet("Subject", "This is the Subject");
myItem.OlePropertyGet("Recipients").OleFunction("Add", WideString("xxx@xxx.com")); // Здесь будет адрес

myItem.OlePropertySet("Body", (WideString)memoBody->Text);

Variant myAttachments = myItem.OlePropertyGet("Attachments");
myAttachments.OleFunction("Add", WideString("F:\\fam.txt")); // Здесь будет имя файла
myItem.OleProcedure("Send");
MSOApp.OleFunction("Quit");
}
catch(...)
{
ShowMessage(L"Ошибка при отправке почты");
}
}
Вроде нигде не ошибся, компиляцию проходит (BDS 2009), но запускать - не запускал, я MSOutlook не держу... На форме - одна кнопка и Мемо, в котором набирается сам текст сообщения. Только измени адрес на свой, когда будешь тестировать...

При запуске тебя MSO может спросить, хочешь ли ты дать доступ программе к Аутлуку, и на какое время (я просто помню, раньше с таким сталкивался. А вот как решал проблему - не помню. Да и на Дельфи дело было, а не на Билдере). Дай доступ, и посмотри, отсылается ли вообще письмо, для начала...
 К началу страницы 
+ Ответить 

Сообщений в этой теме
taran   Отправка почты   30.01.2010 18:57
volvo   Скачай Drkb , и посмотри вот по этому пути: Интерн…   30.01.2010 19:09
taran   Спасибо за совет, я ознакомился, но не смог оконча…   31.01.2010 5:09
volvo   С Аутлуком вполне можно работать через Ole Automat…   31.01.2010 5:51
taran   Спасибо.   31.01.2010 16:05
do you need a prescription for p   Cialis Moins Cher Paris   3.11.2021 8:26
taran   Как известно, письма отправляются только при откры…   31.01.2010 19:00
can you buy plaquenil over the c   Generic Zentel Walsall   6.12.2021 5:06
volvo   Это не нужно, при попытке отправки письма Аутлук и…   1.02.2010 2:14
taran   Это не нужно, при попытке отправки письма Аутлук …   1.02.2010 4:47
volvo   Хорошо, зайдем с другой стороны. Что происходит у …   1.02.2010 5:55
taran   Можно теперь узнать, что происходит у тебя? При …   1.02.2010 17:05
volvo   Неправда... Согласно коду - должно быть так: Vari…   1.02.2010 17:38
taran   Версия Outlook- 2007, Билдера - 6. Что происходит…   1.02.2010 18:25
volvo   Хм... У тебя что, Билдер глючит? Смотри: try {…   1.02.2010 18:35
taran   Смотри: try { // Попытка запуска Outlook..…   1.02.2010 18:48
taran   Кстати, подскажите ещё, пожалуйста, как называется…   1.02.2010 19:27
volvo   В MSDN, где же еще? :) Вот объектная модель Outlo…   1.02.2010 19:35
nishaknapp   Why not settling on games that is fun and at the s…   29.07.2022 17:24


 Ответить  Открыть новую тему 
1 чел. читают эту тему (гостей: 1, скрытых пользователей: 0)
Пользователей: 0

 





- Текстовая версия 22.05.2024 4:11
500Gb HDD, 6Gb RAM, 2 Cores, 7 EUR в месяц — такие хостинги правда бывают
Связь с администрацией: bu_gen в домене octagram.name