如何实现程序放送电子邮件？

Question

我有对方的Email地址，还有要发送的内容，如何能够将Mail通过编程发送出去呢？
需要调用什么函数？是不是可以不留下自己发送方的Mail地址？

Answer 1

可以看看SMTP的具体实现。
如果不要不用某个SMTP，而是直接把邮件送到对方的信箱的话，有点难度。看看这个网页中对SMTP的介绍你就明白了。好象没有具体的函数可以调用。

Answer 2

http://www.longen.org/s-z/details~z/smtp.htm

Answer 3

同上，假如你自己有可以利用的SMTP服务器的话(如新浪的然后用自己的账号和密码登录发送)，可以直接调用MAPI函数发送的就跟OUTLOOK调用的函数一样，假如你想让自己的机器发送的话，要写一个简单的SMTP类吧，看看DELPHI的INDY控件里面的SMTP原代码吧。那里面对邮件的好多东东的资料还是蛮全的，

Answer 4

很简单， 如果你安装了 Outlook （不是 Outlook express），
你就可以调用 Outlook 的 COM 组件发信。
否则， SMTP协议也非常简单，直接用就行。

Answer 5

我对Smtp几乎一无所知，呵呵，事在人为啊。谢谢各位大哥的帮助，我想知道如果我想用Sina的邮箱来发信，那我登陆的用户名和密码填什么啊？
我用smtp.sina.com.cn总是说连接不到服务器啊。

Answer 6

我其实很想用Csocket自己做一个CSmtp类的，但是不知道用户名和密码应该怎么处理呢？

Answer 7

用下面的类：
#include "MAPI.H"
class CIMapi
{
public:
CIMapi();
~CIMapi(); enum errorCodes
{
IMAPI_SUCCESS = 0,
IMAPI_LOADFAILED,
IMAPI_INVALIDDLL,
IMAPI_FAILTO,
IMAPI_FAILCC,
IMAPI_FAILATTACH
};// Attributes
void Subject(LPCTSTR subject) { m_message.lpszSubject = (LPTSTR) subject; }
void Text(LPCTSTR text) { m_text = text; } UINT Error();
void From(LPCTSTR from) { m_from.lpszName = (LPTSTR) from; } static BOOL HasEmail();// Operations
BOOL To(LPCTSTR recip);
BOOL Cc(LPCTSTR recip);
BOOL Attach(LPCTSTR path, LPCTSTR name = NULL);

BOOL Send(ULONG flags = 0);private:
BOOL AllocNewTo(); MapiMessage m_message;
MapiRecipDesc m_from;
UINT m_error;
CString m_text; ULONG (PASCAL *m_lpfnSendMail)(ULONG, ULONG, MapiMessage*, FLAGS, ULONG);

static HINSTANCE m_hInstMail;
static BOOL m_isMailAvail;
};
//实现CPP
#include "stdafx.h"
#include <mapi.h>
#include "imapi.h"HINSTANCE CIMapi::m_hInstMail = (HINSTANCE) NULL;
BOOL   CIMapi::m_isMailAvail = (BOOL) -1;CIMapi::CIMapi()
{
m_error = 0; // Initially error free memset(&m_message, 0, sizeof(MapiMessage));
memset(&m_from, 0, sizeof(MapiRecipDesc));
m_message.lpOriginator = &m_from;
m_from.ulRecipClass = MAPI_ORIG; if (m_hInstMail == (HINSTANCE) NULL) // Load the MAPI dll
m_hInstMail = ::LoadLibraryA("MAPI32.DLL"); if (m_hInstMail == (HINSTANCE) NULL)
{
AfxMessageBox(AFX_IDP_FAILED_MAPI_LOAD);
m_error = IMAPI_LOADFAILED;
return;
} ASSERT(m_hInstMail != (HINSTANCE) NULL); // Now get the pointer to the send function
(FARPROC&) m_lpfnSendMail = GetProcAddress(m_hInstMail, "MAPISendMail"); if (m_lpfnSendMail == NULL)
{
AfxMessageBox(AFX_IDP_INVALID_MAPI_DLL);
m_error = IMAPI_INVALIDDLL;
return;
} ASSERT(m_lpfnSendMail != NULL);
}CIMapi::~CIMapi()
{
if (m_hInstMail != (HINSTANCE) NULL)
::FreeLibrary(m_hInstMail); m_hInstMail = (HINSTANCE) NULL;

free(m_message.lpFiles);
free(m_message.lpRecips);
}BOOL CIMapi::HasEmail()
{
if (m_isMailAvail == (BOOL) -1)
m_isMailAvail = ::GetProfileInt(_T("MAIL"), _T("MAPI"), 0) != 0 && SearchPath(NULL, _T("MAPI32.DLL"), NULL, 0, NULL, NULL) != 0; return m_isMailAvail;
}UINT CIMapi::Error()
{
UINT temp = m_error; m_error = IMAPI_SUCCESS;
return temp;
}BOOL CIMapi::AllocNewTo()
{
// Allocate a new MapiRecipDesc structure and initialise it to all zeros
m_message.lpRecips = (MapiRecipDesc *) realloc(m_message.lpRecips, (m_message.nRecipCount + 1) * sizeof(MapiRecipDesc));
memset(&m_message.lpRecips[m_message.nRecipCount], 0, sizeof(MapiRecipDesc)); ASSERT(m_message.lpRecips);
return m_message.lpRecips != (MapiRecipDesc *) NULL;
}BOOL CIMapi::To(LPCTSTR recip)
{
if (AllocNewTo())
{
// We succeeded in allocating a new recipient record
m_message.lpRecips[m_message.nRecipCount].lpszName = (LPTSTR) malloc(strlen(recip) + 1);
strcpy(m_message.lpRecips[m_message.nRecipCount].lpszName, recip);
m_message.lpRecips[m_message.nRecipCount].ulRecipClass = MAPI_TO;
m_message.nRecipCount++;
return TRUE;
} m_error = IMAPI_FAILTO;
return FALSE;
}BOOL CIMapi::Cc(LPCTSTR recip)
{
if (AllocNewTo())
{
// We succeeded in allocating a new recipient record
m_message.lpRecips[m_message.nRecipCount].lpszName = (LPTSTR) malloc(strlen(recip) + 1);
strcpy(m_message.lpRecips[m_message.nRecipCount].lpszName, recip);
m_message.lpRecips[m_message.nRecipCount].ulRecipClass = MAPI_CC;
m_message.nRecipCount++;
return TRUE;
} m_error = IMAPI_FAILCC;
return FALSE;
}BOOL CIMapi::Attach(LPCTSTR path, LPCTSTR name)
{
// Add a new attachment record
m_message.lpFiles = (MapiFileDesc *) realloc(m_message.lpFiles, (m_message.nFileCount + 1) * sizeof(MapiFileDesc));
memset(&m_message.lpFiles[m_message.nFileCount], 0, sizeof(MapiFileDesc)); ASSERT(m_message.lpFiles);

if (m_message.lpFiles == (MapiFileDesc *) NULL)
{
m_error = IMAPI_FAILATTACH;
return FALSE;
} m_message.lpFiles[m_message.nFileCount].lpszPathName = (LPTSTR) malloc(strlen(path) + 1);
strcpy(m_message.lpFiles[m_message.nFileCount].lpszPathName, path); if (name != (LPCTSTR) NULL)
{
m_message.lpFiles[m_message.nFileCount].lpszFileName = (LPTSTR) malloc(strlen(name) + 1);
strcpy(m_message.lpFiles[m_message.nFileCount].lpszFileName, name);
} m_message.nFileCount++;
return TRUE;
}BOOL CIMapi::Send(ULONG flags)
{
CWaitCursor wait;
int offset = m_text.GetLength(); // Add 1 space per attachment at the end of the body text.
m_text += CString(' ', m_message.nFileCount); // Set each attachment to replace one of the added spaces at the end of the body text.
for (UINT i = 0; i < m_message.nFileCount; i++)
m_message.lpFiles[i].nPosition = offset++; m_message.lpszNoteText = (LPTSTR) (LPCTSTR) m_text; //  Set the body text // prepare for modal dialog box
AfxGetApp()->EnableModeless(FALSE);
HWND hWndTop;
CWnd* pParentWnd = CWnd::GetSafeOwner(NULL, &hWndTop); // some extra precautions are required to use MAPISendMail as it
// tends to enable the parent window in between dialogs (after
// the login dialog, but before the send note dialog).
pParentWnd->SetCapture();
::SetFocus(NULL);
pParentWnd->m_nFlags |= WF_STAYDISABLED; int nError = m_lpfnSendMail(0, (ULONG) pParentWnd->GetSafeHwnd(), &m_message, MAPI_LOGON_UI | flags, 0); // after returning from the MAPISendMail call, the window must
// be re-enabled and focus returned to the frame to undo the workaround
// done before the MAPI call.
::ReleaseCapture();
pParentWnd->m_nFlags &= ~WF_STAYDISABLED; pParentWnd->EnableWindow(TRUE);
::SetActiveWindow(NULL);
pParentWnd->SetActiveWindow();
pParentWnd->SetFocus();

if (hWndTop != NULL)
::EnableWindow(hWndTop, TRUE);

AfxGetApp()->EnableModeless(TRUE); // Now free malloced recipients
for (i = 0; i < m_message.nRecipCount; i++)
free(m_message.lpRecips[i].lpszName); // Then free malloced attachments
for (i = 0; i < m_message.nFileCount; i++)
{
free(m_message.lpFiles[i].lpszPathName);
free(m_message.lpFiles[i].lpszFileName);
} if (nError != SUCCESS_SUCCESS && nError != MAPI_USER_ABORT && nError != MAPI_E_LOGIN_FAILURE)
{
AfxMessageBox(AFX_IDP_FAILED_MAPI_SEND);
return FALSE;
} return TRUE;
}