MFC邮件客户端毕业设计改进版 张鹏

修改了以前传的一份旧代码。修改了一些bug。实现发邮件、收邮件、草稿箱、发件箱、已发送等功能。vs2008+sp1

// Addlinkman.cpp : implementation file
//

#include “stdafx.h“
#include “EmailClient.h“
#include “Addlinkman.h“

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

/////////////////////////////////////////////////////////////////////////////
// Addlinkman dialog


Addlinkman::Addlinkman（CWnd* pParent /*=NULL*/）
	: CDialog（Addlinkman::IDD pParent）
{
	//{{AFX_DATA_INIT（Addlinkman）
	m_name = _T（““）;
	m_mail = _T（““）;
	m_addr = _T（““）;
	m_phone = _T（““）;
	//}}AFX_DATA_INIT
}


void Addlinkman::DoDataExchange（CDataExchange* pDX）
{
	CDialog::DoDataExchange（pDX）;
	//{{AFX_DATA_MAP（Addlinkman）
	DDX_Text（pDX IDC_EDIT1 m_name）;
	DDX_Text（pDX IDC_EDIT2 m_mail）;
	DDX_Text（pDX IDC_EDIT3 m_addr）;
	DDX_Text（pDX IDC_EDIT4 m_phone）;
	//}}AFX_DATA_MAP
}


BEGIN_MESSAGE_MAP（Addlinkman CDialog）
	//{{AFX_MSG_MAP（Addlinkman）
	//}}AFX_MSG_MAP
END_MESSAGE_MAP（）

/////////////////////////////////////////////////////////////////////////////
// Addlinkman message handlers

void Addlinkman::OnOK（） 
{
	// TODO: Add extra validation here
	_variant_t RecordsAffected; 
	UpdateData（）;
	if（m_name.IsEmpty（）|m_mail.IsEmpty（））
	{
		AfxMessageBox（“姓名邮箱不能为空！“）;
		return;
	}
	CString strSQL; 

	strSQL.Format（“INSERT INTO 联系人（usernamemailaddrphone） VALUES （‘%s‘ ‘%s‘‘%s‘‘%s‘）“m_namem_mailm_addrm_phone）; 
	m_pConnection->Execute（（_bstr_t）strSQL&RecordsAffectedadCmdText）; 
	AfxMessageBox（“添加成功“）;
	m_name=m_mail=m_addr=m_phone=““;
	UpdateData（false）;	

}

BOOL Addlinkman::OnInitDialog（）
{
CDialog::OnInitDialog（）;
HRESULT hr; 
	try 
	{ 

		hr = m_pConnection.CreateInstance（“ADODB.Connection“）;//创建Connection对象 
		if（SUCCEEDED（hr）） 
		{ 
			hr = m_pConnection->Open（“Provider=Microsoft.Jet.OLEDB.4.0;Data Source=EmailClient.mdb“““““adModeUnknown）;///连接数据库
		
		}
	}
	
	catch（_com_error e）///捕捉异常 
	{ 
		CString errormessage; 
		errormessage.Format（“连接数据库失败!\r\n错误信息:%s“e.ErrorMessage（））; 
		AfxMessageBox（errormessage）;///显示错误信息 
	} 
	_variant_t RecordsAffected; 
	//m_pConnection->Execute（“CREATE TABLE studentinfo（stuNo TEXTstuname TEXTstuaddress TEXTstuphone TEXT）“&RecordsAffectedadCmdText）; 
	return TRUE;  // return TRUE  unless you set the focus to a control
}

 属性            大小     日期    时间   名称
----------- ---------  ---------- -----  ----

     文件    1606882  2011-05-13 16:34  邮件客户端MFC\JMail44_pro.exe

     文件        107  2011-05-28 17:55  邮件客户端MFC\配置说明.txt

     文件       2367  2013-03-19 19:28  邮件客户端MFC\zhangpeng\Addlinkman.cpp

     文件       1348  2011-05-01 22:52  邮件客户端MFC\zhangpeng\Addlinkman.h

     文件       3419  2013-03-19 19:28  邮件客户端MFC\zhangpeng\AddUser.cpp

     文件       1372  2011-05-15 21:23  邮件客户端MFC\zhangpeng\AddUser.h

     文件       2353  2011-04-26 17:49  邮件客户端MFC\zhangpeng\ADO.cpp

     文件        835  2008-04-02 13:56  邮件客户端MFC\zhangpeng\ADO.h

     文件       5531  2013-03-19 20:02  邮件客户端MFC\zhangpeng\DraftBox.cpp

     文件       1395  2011-05-19 00:06  邮件客户端MFC\zhangpeng\DraftBox.h

     文件       2556  2013-03-19 19:28  邮件客户端MFC\zhangpeng\EmailClient.cpp

     文件       1381  2013-03-19 19:28  邮件客户端MFC\zhangpeng\EmailClient.h

     文件       1280  2013-03-19 21:31  邮件客户端MFC\zhangpeng\EmailClient.ldb

     文件     823296  2013-03-19 21:31  邮件客户端MFC\zhangpeng\EmailClient.mdb

     文件        887  2013-03-19 19:37  邮件客户端MFC\zhangpeng\EmailClient.sln

    ..A..H.     76800  2013-03-19 21:33  邮件客户端MFC\zhangpeng\EmailClient.suo

     文件      15791  2013-03-19 20:50  邮件客户端MFC\zhangpeng\EmailClient.vcproj

     文件       1425  2013-03-19 20:04  邮件客户端MFC\zhangpeng\EmailClient.vcproj.HIK.zhangpengyf.user

     文件      11680  2013-03-19 20:04  邮件客户端MFC\zhangpeng\EmailClientDlg.cpp

     文件       2025  2013-03-19 20:03  邮件客户端MFC\zhangpeng\EmailClientDlg.h

     文件     361984  2003-05-14 15:52  邮件客户端MFC\zhangpeng\jmail.dll

     文件      55404  2003-05-14 15:52  邮件客户端MFC\zhangpeng\jmail.tlh

     文件      57199  2003-05-14 15:52  邮件客户端MFC\zhangpeng\jmail.tli

     文件       5943  2013-03-19 19:28  邮件客户端MFC\zhangpeng\linkman.cpp

     文件       1437  2011-05-21 21:35  邮件客户端MFC\zhangpeng\linkman.h

     文件      90631  2009-07-14 09:15  邮件客户端MFC\zhangpeng\msado15.tlh

     文件      76620  2009-07-14 09:15  邮件客户端MFC\zhangpeng\msado15.tli

     文件        687  2011-04-16 16:22  邮件客户端MFC\zhangpeng\MySocket.cpp

     文件       1100  2011-04-16 16:22  邮件客户端MFC\zhangpeng\MySocket.h

     文件       2545  2013-03-19 19:28  邮件客户端MFC\zhangpeng\ReadMail.cpp

............此处省略43个文件信息