CSDN博客

img ktcserver

在C++Builder 中调用OutLook发送邮件

发表于2004/7/4 19:03:00  1374人阅读

在C++Builder 中调用OutLook发送邮件

1)首先在CPP文件里面加上
#include "MAPI.hpp"

在需要调用发送邮件的地方写下如下代码:
void __fastcall TForm1::Button1Click(TObject *Sender)
{


 TMapiMessage MapiMessage;
 Cardinal MError;

 MapiMessage.ulReserved = 0;
 MapiMessage.lpszSubject = NULL;
 MapiMessage.lpszNoteText = RichEdit1->Lines->Text.c_str();
 MapiMessage.lpszMessageType = NULL;
 MapiMessage.lpszDateReceived = NULL;
 MapiMessage.lpszConversationID = NULL;
 MapiMessage.flFlags = 0;
 MapiMessage.lpOriginator = NULL;
 MapiMessage.nRecipCount = 0;
 MapiMessage.lpRecips = NULL;
 MapiMessage.nFileCount = 0;
 MapiMessage.lpFiles = NULL;

 MError = MapiSendMail(0, reinterpret_cast<unsigned int>(Application->Handle),
                 MapiMessage, MAPI_DIALOG | MAPI_LOGON_UI | MAPI_NEW_SESSION, 0);

 if (MError)
  ShowMessage("发送邮件错误!");

}

这样就可以调用OutLook发送邮件了。

0 0

相关博文

我的热门文章

img
取 消
img