www.pudn.com > send_email2.rar > readme.bin

调用默认的电子邮件程序发送EMail 
		作者：耿海增  
		Email：genghaizeng@163.com 
 
很多时候大家需要在程序中发送邮件，自己编又太麻烦，怎么办，呵呵，有现成的！ 
 
 
1、想省事儿的，用ShellExecute函数： 
 
 
ShellExecute(NULL,NULL,"mailto:email@163.net",NULL,NULL,SW_SHOW); 
 
 
2、如果想自己多处理一些东西的话，比如加上默认的帐号、密码、附件等，就可以调用系统的Mapi函数。具体的用法大家可以去查MSDN都是以MAPI开头的，如MAPILogon、MAPISendMail等。下面演示如何调用默认的邮件程序发送邮件, 
可以添加多个附件 
 
//必须包括 mapi.h 头文件 
#include "mapi.h"                      
 
/********************************************************************* 
 * 函数名称:CSendEMailDlg::OnSendMapi 
 * 说明:  调用MAPI函数发送邮件。 
 * 作者:  Geng 
 * 时间 : 2003-04-22 20:08:30  
*********************************************************************/ 
void CSendEMailDlg::OnSendMapi()  
{ 
	UpdateData(true); 
 
	//装入MAPI32.DLL动态库 
	HMODULE hMod = LoadLibrary("MAPI32.DLL"); 
 
	if (hMod == NULL) 
	{ 
		AfxMessageBox(AFX_IDP_FAILED_MAPI_LOAD); 
		return; 
	} 
 
	//获取发送邮件的函数地址 
	ULONG (PASCAL *lpfnSendMail)(ULONG, ULONG, MapiMessage*, FLAGS, ULONG); 
	(FARPROC&)lpfnSendMail = GetProcAddress(hMod, "MAPISendMail"); 
 
	if (lpfnSendMail == NULL) 
	{ 
		AfxMessageBox(AFX_IDP_INVALID_MAPI_DLL); 
		return; 
	} 
 
	int nFileCount = m_list.GetCount();	//有多少个附件需要发送 
 
	//分配内存保存附件信息	不能使用静态数组，因为不知道要发送附件的个数 
	MapiFileDesc* pFileDesc = (MapiFileDesc*)malloc(sizeof(MapiFileDesc) * nFileCount); 
	memset(pFileDesc,0,sizeof(MapiFileDesc) * nFileCount); 
 
	//分配内存保存附件文件路径 
	TCHAR* pTchPath = (TCHAR*)malloc(MAX_PATH * nFileCount); 
 
	CString szText; 
	for(int i = 0;i < nFileCount;i++) 
	{ 
		TCHAR* p = pTchPath + MAX_PATH * i; 
		m_list.GetText(i,szText); 
		strcpy(p,szText); 
 
		(pFileDesc + i)->nPosition = (ULONG)-1; 
		(pFileDesc + i)->lpszPathName = p; 
		(pFileDesc + i)->lpszFileName = p; 
	} 
 
	//收件人结构信息 
	MapiRecipDesc recip; 
	memset(&recip,0,sizeof(MapiRecipDesc)); 
	recip.lpszAddress	= m_szEmailMAPI.GetBuffer(0); 
	recip.ulRecipClass = MAPI_TO; 
 
	//邮件结构信息 
	MapiMessage message; 
	memset(&message, 0, sizeof(message)); 
	message.nFileCount	= nFileCount;				//文件个数 
	message.lpFiles		= pFileDesc;				//文件信息 
	message.nRecipCount = 1;						//收件人个数 
	message.lpRecips 	= &recip;					//收件人 
	message.lpszSubject	= m_szSubject.GetBuffer(0);	//主题 
	message.lpszNoteText= m_szText.GetBuffer(0);	//正文内容 
 
	//保存本程序窗口指针，因为发完邮件后要返回本程序的窗口 
	CWnd* pParentWnd = CWnd::GetSafeOwner(NULL, NULL); 
 
	//发送邮件 
	int nError = lpfnSendMail(0, 0, 
					&message, MAPI_LOGON_UI|MAPI_DIALOG, 0); 
 
	if (nError != SUCCESS_SUCCESS && nError != MAPI_USER_ABORT  
			&& nError != MAPI_E_LOGIN_FAILURE) 
	{ 
		AfxMessageBox(AFX_IDP_FAILED_MAPI_SEND); 
	} 
 
	//返回程序 
	pParentWnd->SetActiveWindow(); 
 
	//不要忘了释放分配的内存 
	free(pFileDesc); 
	free(pTchPath); 
	FreeLibrary(hMod); 
}