www.gusucode.com > VB病毒编程源代码资料及教程 > VB病毒编程源代码资料及教程/code/!!病毒编程资料/VB发送邮件/VC静态引入smtp.dll示例代码/linkdllDlg.cpp

    /*
	本程序为简邮邮件组件的演示程序

	作者:三毛
	QQ:510784518
	博客：http://hi.baidu.com/suruiqiang
*/

// linkdllDlg.cpp : implementation file
//

#include "stdafx.h"
#include "linkdll.h"
#include "linkdllDlg.h"

BOOL _declspec(dllimport) WINAPI SendMail(	
										  LPCSTR smtpserver,
										  LPCSTR user,
										  LPCSTR password,
										  LPCSTR mailfrom,
										  LPCSTR mailto,
										  LPCSTR subject,
										  LPCSTR msgbody
										  );
BOOL _declspec(dllimport) WINAPI GetSmtpError(LPSTR strerrmsg);

#ifdef _DEBUG
#define new DEBUG_NEW
#undef THIS_FILE
static char THIS_FILE[] = __FILE__;
#endif

/////////////////////////////////////////////////////////////////////////////
// CLinkdllDlg dialog

CLinkdllDlg::CLinkdllDlg(CWnd* pParent /*=NULL*/)
	: CDialog(CLinkdllDlg::IDD, pParent)
{
	//{{AFX_DATA_INIT(CLinkdllDlg)
		// NOTE: the ClassWizard will add member initialization here
	//}}AFX_DATA_INIT
	// Note that LoadIcon does not require a subsequent DestroyIcon in Win32
	m_hIcon = AfxGetApp()->LoadIcon(IDR_MAINFRAME);
}

void CLinkdllDlg::DoDataExchange(CDataExchange* pDX)
{
	CDialog::DoDataExchange(pDX);
	//{{AFX_DATA_MAP(CLinkdllDlg)
		// NOTE: the ClassWizard will add DDX and DDV calls here
	//}}AFX_DATA_MAP
}

BEGIN_MESSAGE_MAP(CLinkdllDlg, CDialog)
	//{{AFX_MSG_MAP(CLinkdllDlg)
	ON_WM_PAINT()
	ON_WM_QUERYDRAGICON()
	ON_BN_CLICKED(IDC_BTN_TEST, OnBtnTest)
	//}}AFX_MSG_MAP
END_MESSAGE_MAP()

/////////////////////////////////////////////////////////////////////////////
// CLinkdllDlg message handlers

BOOL CLinkdllDlg::OnInitDialog()
{
	CDialog::OnInitDialog();

	// Set the icon for this dialog.  The framework does this automatically
	//  when the application's main window is not a dialog
	SetIcon(m_hIcon, TRUE);			// Set big icon
	SetIcon(m_hIcon, FALSE);		// Set small icon
	
	// TODO: Add extra initialization here
	
	return TRUE;  // return TRUE  unless you set the focus to a control
}

// If you add a minimize button to your dialog, you will need the code below
//  to draw the icon.  For MFC applications using the document/view model,
//  this is automatically done for you by the framework.

void CLinkdllDlg::OnPaint() 
{
	if (IsIconic())
	{
		CPaintDC dc(this); // device context for painting

		SendMessage(WM_ICONERASEBKGND, (WPARAM) dc.GetSafeHdc(), 0);

		// Center icon in client rectangle
		int cxIcon = GetSystemMetrics(SM_CXICON);
		int cyIcon = GetSystemMetrics(SM_CYICON);
		CRect rect;
		GetClientRect(&rect);
		int x = (rect.Width() - cxIcon + 1) / 2;
		int y = (rect.Height() - cyIcon + 1) / 2;

		// Draw the icon
		dc.DrawIcon(x, y, m_hIcon);
	}
	else
	{
		CDialog::OnPaint();
	}
}

// The system calls this to obtain the cursor to display while the user drags
//  the minimized window.
HCURSOR CLinkdllDlg::OnQueryDragIcon()
{
	return (HCURSOR) m_hIcon;
}

void CLinkdllDlg::OnBtnTest() 
{
	// TODO: Add your control notification handler code here
	char* stserver = "smtp.163.com";
	char* user = "xiaoqiangzi5271";
	char* pwd = "我的密码";
	
	char* sender = "xiaoqiangzi5271@163.com";
	char* receiver = "bestsanmao@qq.com";
	char* title = "邮件标题";
	char* body = "邮件内容";
	if (SendMail(stserver,user,pwd,sender,receiver,title,body))
	{
		MessageBox("邮件发送成功");
	}
	else
	{
		char strerrmsg[100];

		GetSmtpError(strerrmsg);
		MessageBox(strerrmsg,"邮件发送失败");
	}
}