crdbsdlg.cpp

< Visual C+++SQL Server数据库开发与实例>>一书中的实例核心源程序提供了几个案例的编程源代码。

// CRDBSDlg.cpp : implementation file
//

#include "stdafx.h"
#include "CRDBS.h"
#include "CRDBSDlg.h"
#include "CRDBSLogin.h"
#include "DetailQueryDlg.h"
#include "StatQueryDlg.h"

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

/////////////////////////////////////////////////////////////////////////////
// CAboutDlg dialog used for App About
CDatabase m_db;
class CAboutDlg : public CDialog
{
public:
	CAboutDlg();

// Dialog Data
	//{{AFX_DATA(CAboutDlg)
	enum { IDD = IDD_ABOUTBOX };
	//}}AFX_DATA

	// ClassWizard generated virtual function overrides
	//{{AFX_VIRTUAL(CAboutDlg)
	protected:
	virtual void DoDataExchange(CDataExchange* pDX);    // DDX/DDV support
	//}}AFX_VIRTUAL

// Implementation
protected:
	//{{AFX_MSG(CAboutDlg)
	//}}AFX_MSG
	DECLARE_MESSAGE_MAP()
};

CAboutDlg::CAboutDlg() : CDialog(CAboutDlg::IDD)
{
	//{{AFX_DATA_INIT(CAboutDlg)
	//}}AFX_DATA_INIT
}

void CAboutDlg::DoDataExchange(CDataExchange* pDX)
{
	CDialog::DoDataExchange(pDX);
	//{{AFX_DATA_MAP(CAboutDlg)
	//}}AFX_DATA_MAP
}

BEGIN_MESSAGE_MAP(CAboutDlg, CDialog)
	//{{AFX_MSG_MAP(CAboutDlg)
		// No message handlers
	//}}AFX_MSG_MAP
END_MESSAGE_MAP()

/////////////////////////////////////////////////////////////////////////////
// CCRDBSDlg dialog

CCRDBSDlg::CCRDBSDlg(CWnd* pParent /*=NULL*/)
	: CDialog(CCRDBSDlg::IDD, pParent)
{
	//{{AFX_DATA_INIT(CCRDBSDlg)
	m_strSelectedApproach = _T("");
	m_strSelectedProfession = _T("");
	m_strSelectedVocation = _T("");
	m_strCompany = _T("");
	m_strConfigApproach = _T("");
	m_strConfigProfession = _T("");
	m_strConfigVocation = _T("");
	m_strEmail = _T("");
	m_strInterest = _T("");
	m_strMemo = _T("");
	m_strMobile = _T("");
	m_strName = _T("");
	m_strPhone = _T("");
	m_strConfigArea = _T("");
	m_strSelectedArea = _T("");
	//}}AFX_DATA_INIT
	// Note that LoadIcon does not require a subsequent DestroyIcon in Win32
	m_hIcon = AfxGetApp()->LoadIcon(IDR_MAINFRAME);
}

void CCRDBSDlg::DoDataExchange(CDataExchange* pDX)
{
	CDialog::DoDataExchange(pDX);
	//{{AFX_DATA_MAP(CCRDBSDlg)
	DDX_Control(pDX, IDC_COMBO_APPROACH, m_comboApproach);
	DDX_Control(pDX, IDC_COMBO_AREA, m_comboArea);
	DDX_Control(pDX, IDC_LIST_AREA, m_listArea);
	DDX_Control(pDX, IDC_LIST_VOCATION, m_listVocation);
	DDX_Control(pDX, IDC_LIST_PROFESSION, m_listProfession);
	DDX_Control(pDX, IDC_LIST_HR, m_listHR);
	DDX_Control(pDX, IDC_LIST_APPRAOCH, m_listApproach);
	DDX_Control(pDX, IDC_COMBO_VOCATION, m_comboVocation);
	DDX_Control(pDX, IDC_COMBO_PROFESSION, m_comboProfession);
	DDX_CBString(pDX, IDC_COMBO_APPROACH, m_strSelectedApproach);
	DDX_CBString(pDX, IDC_COMBO_PROFESSION, m_strSelectedProfession);
	DDX_CBString(pDX, IDC_COMBO_VOCATION, m_strSelectedVocation);
	DDX_Text(pDX, IDC_EDIT_COMPANY, m_strCompany);
	DDX_Text(pDX, IDC_EDIT_CONFIG_APPROACH, m_strConfigApproach);
	DDX_Text(pDX, IDC_EDIT_CONFIG_PROFESSION, m_strConfigProfession);
	DDX_Text(pDX, IDC_EDIT_CONFIG_VOCATION, m_strConfigVocation);
	DDX_Text(pDX, IDC_EDIT_EMAIL, m_strEmail);
	DDX_Text(pDX, IDC_EDIT_INTEREST, m_strInterest);
	DDX_Text(pDX, IDC_EDIT_MEMO, m_strMemo);
	DDX_Text(pDX, IDC_EDIT_MOBILE, m_strMobile);
	DDX_Text(pDX, IDC_EDIT_NAME, m_strName);
	DDX_Text(pDX, IDC_EDIT_PHONE, m_strPhone);
	DDX_Text(pDX, IDC_EDIT_CONFIG_AREA, m_strConfigArea);
	DDX_CBString(pDX, IDC_COMBO_AREA, m_strSelectedArea);
	//}}AFX_DATA_MAP
}

BEGIN_MESSAGE_MAP(CCRDBSDlg, CDialog)
	//{{AFX_MSG_MAP(CCRDBSDlg)
	ON_WM_SYSCOMMAND()
	ON_WM_PAINT()
	ON_WM_QUERYDRAGICON()
	ON_NOTIFY(NM_CLICK, IDC_LIST_AREA, OnClickListArea)
	ON_NOTIFY(NM_CLICK, IDC_LIST_HR, OnClickListHr)
	ON_NOTIFY(NM_CLICK, IDC_LIST_PROFESSION, OnClickListProfession)
	ON_NOTIFY(NM_CLICK, IDC_LIST_VOCATION, OnClickListVocation)
	ON_NOTIFY(NM_CLICK, IDC_LIST_APPRAOCH, OnClickListAppraoch)
	ON_BN_CLICKED(IDC_BTN_AREA_ADD, OnBtnAreaAdd)
	ON_BN_CLICKED(IDC_BTN_AREA_MOD, OnBtnAreaMod)
	ON_BN_CLICKED(IDC_BTN_AREA_DEL, OnBtnAreaDel)
	ON_BN_CLICKED(IDC_BTN_APPROACH_ADD, OnBtnApproachAdd)
	ON_BN_CLICKED(IDC_BTN_APPROACH_MOD, OnBtnApproachMod)
	ON_BN_CLICKED(IDC_BTN_APPROACH_DEL, OnBtnApproachDel)
	ON_BN_CLICKED(IDC_BTN_PROFESSION_ADD, OnBtnProfessionAdd)
	ON_BN_CLICKED(IDC_BTN_PROFESSION_MOD, OnBtnProfessionMod)
	ON_BN_CLICKED(IDC_BTN_PROFESSION_DEL, OnBtnProfessionDel)
	ON_BN_CLICKED(IDC_BTN_VOCATION_ADD, OnBtnVocationAdd)
	ON_BN_CLICKED(IDC_BTN_VOCATION_MOD, OnBtnVocationMod)
	ON_BN_CLICKED(IDC_BTN_VOCATION_DEL, OnBtnVocationDel)
	ON_BN_CLICKED(IDC_BTN_HR_ADD, OnBtnHrAdd)
	ON_BN_CLICKED(IDC_BTN_HR_MOD, OnBtnHrMod)
	ON_BN_CLICKED(IDC_BTN_HR_DEL, OnBtnHrDel)
	ON_BN_CLICKED(IDC_BTN_HR_QUERY, OnBtnHrQuery)
	ON_BN_CLICKED(IDC_BTN_DETAIL_QUERY, OnBtnDetailQuery)
	ON_BN_CLICKED(IDC_BTN_STAT_QUERY, OnBtnStatQuery)
	ON_BN_CLICKED(ID_SYS_EXIT, OnSysExit)
	//}}AFX_MSG_MAP
END_MESSAGE_MAP()

/////////////////////////////////////////////////////////////////////////////
// CCRDBSDlg message handlers

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

	CCRDBSLogin login;

	if(login.DoModal()!=IDOK) return FALSE;

	ASSERT((IDM_ABOUTBOX & 0xFFF0) == IDM_ABOUTBOX);
	ASSERT(IDM_ABOUTBOX < 0xF000);
	//AfxMessageBox("init dlg");

	CMenu* pSysMenu = GetSystemMenu(FALSE);
	if (pSysMenu != NULL)
	{
		CString strAboutMenu;
		strAboutMenu.LoadString(IDS_ABOUTBOX);
		if (!strAboutMenu.IsEmpty())
		{
			pSysMenu->AppendMenu(MF_SEPARATOR);
			pSysMenu->AppendMenu(MF_STRING, IDM_ABOUTBOX, strAboutMenu);
		}
	}

	// 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
	//初始化列表框控件
	InitControl();
	//连接数据库
	//在列表框控件中显示数据
	InitCtrlData();	
	return TRUE;  // return TRUE  unless you set the focus to a control
}

void CCRDBSDlg::OnSysCommand(UINT nID, LPARAM lParam)
{
	if ((nID & 0xFFF0) == IDM_ABOUTBOX)
	{
		CAboutDlg dlgAbout;
		dlgAbout.DoModal();
	}
	else
	{
		CDialog::OnSysCommand(nID, lParam);
	}
}

// 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 CCRDBSDlg::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 CCRDBSDlg::OnQueryDragIcon()
{
	return (HCURSOR) m_hIcon;
}


void CCRDBSDlg::InitControl()
{
	//设置列表框控件扩展风格
	DWORD dwExStyle = LVS_EX_FULLROWSELECT | LVS_EX_GRIDLINES |
		LVS_EX_HEADERDRAGDROP | LVS_EX_ONECLICKACTIVATE | LVS_EX_UNDERLINEHOT;
	m_listArea.SetExtendedStyle(dwExStyle);
	m_listApproach.SetExtendedStyle(dwExStyle);
	m_listProfession.SetExtendedStyle(dwExStyle);
	m_listVocation.SetExtendedStyle(dwExStyle);
	m_listHR.SetExtendedStyle(dwExStyle);	
	//初始地区信息列表框控件
	m_listArea.InsertColumn(0,"地区ID",LVCFMT_CENTER,50);
	m_listArea.InsertColumn(1,"地区名称",LVCFMT_CENTER,90);
	//初始结识途径信息列表框控件
	m_listApproach.InsertColumn(0,"结识途径ID",LVCFMT_CENTER,50);
	m_listApproach.InsertColumn(1,"结识途径名称",LVCFMT_CENTER,90);
	//初始职位信息列表框控件
	m_listProfession.InsertColumn(0,"职位ID",LVCFMT_CENTER,50);
	m_listProfession.InsertColumn(1,"职位名称",LVCFMT_CENTER,90);
	//初始行业信息列表框控件
	m_listVocation.InsertColumn(0,"行业ID",LVCFMT_CENTER,50);
	m_listVocation.InsertColumn(1,"行业名称",LVCFMT_CENTER,90);
	//初始客户信息列表框控件
	m_listHR.InsertColumn(0,"客户ID",LVCFMT_CENTER,60);
	m_listHR.InsertColumn(1,"姓名",LVCFMT_CENTER,80);
	m_listHR.InsertColumn(2,"所在地区",LVCFMT_CENTER,80);
	m_listHR.InsertColumn(3,"职业",LVCFMT_CENTER,80);
	m_listHR.InsertColumn(4,"行业",LVCFMT_CENTER,80);
	m_listHR.InsertColumn(5,"所在单位",LVCFMT_CENTER,80);
	m_listHR.InsertColumn(6,"结识途径",LVCFMT_CENTER,80);
	m_listHR.InsertColumn(7,"e-mail",LVCFMT_CENTER,80);
	m_listHR.InsertColumn(8,"固定电话",LVCFMT_CENTER,80);
	m_listHR.InsertColumn(9,"移动电话",LVCFMT_CENTER,80);
	m_listHR.InsertColumn(10,"爱好",LVCFMT_CENTER,80);
	m_listHR.InsertColumn(11,"说明",LVCFMT_CENTER,140);
}

void CCRDBSDlg::InitCtrlData(){
	if(!m_db.IsOpen()){
		MessageBox("数据库未打开");
		return;
	}
	TRY{
		CRecordset rs(&m_db);
		//打开所有的地区信息记录.
		rs.Open(CRecordset::dynaset, "select * from area_info_tab order by area_id");
		while (!rs.IsEOF()) {
			int id;
			CString area;
			CDBVariant var;
			//获取地区ID字段值
			rs.GetFieldValue((short)0, var, SQL_C_SLONG);
			if (var.m_dwType != DBVT_NULL)	
				id = var.m_iVal;
			var.Clear();			
			//获取地区名称字段值
			rs.GetFieldValue(1, area);	
			InsertConfigItem(&m_listArea,id,area);
			rs.MoveNext();	
		}
		rs.Close();
		//打开所有的结识途径信息记录.
		rs.Open(CRecordset::dynaset, "select * from approach_info_tab order by approach_id");
		while (!rs.IsEOF()) {
			int id;
			CString approach;
			CDBVariant var;
			//获取结识途径ID字段值
			rs.GetFieldValue((short)0, var, SQL_C_SLONG);
			if (var.m_dwType != DBVT_NULL)	
				id = var.m_iVal;
			var.Clear();			
			//获取结识途径字段值
			rs.GetFieldValue(1, approach);	
			InsertConfigItem(&m_listApproach,id,approach);
			rs.MoveNext();	
		}
		rs.Close();
		//打开所有的职位信息记录.
		rs.Open(CRecordset::dynaset, "select * from profession_info_tab order by profession_id");
		while (!rs.IsEOF()) {
			int id;
			CString profession;
			CDBVariant var;
			//获取职位ID字段值
			rs.GetFieldValue((short)0, var, SQL_C_SLONG);
			if (var.m_dwType != DBVT_NULL)	
				id = var.m_iVal;
			var.Clear();			
			//获取职位名称字段值
			rs.GetFieldValue(1, profession);	
			InsertConfigItem(&m_listProfession,id,profession);
			rs.MoveNext();	
		}
		rs.Close();
		//打开所有的行业信息记录.
		rs.Open(CRecordset::dynaset, "select * from vocation_info_tab order by vocation_id");
		while (!rs.IsEOF()) {
			int id;
			CString vocation;
			CDBVariant var;
			//获取行业ID字段值
			rs.GetFieldValue((short)0, var, SQL_C_SLONG);
			if (var.m_dwType != DBVT_NULL)	
				id = var.m_iVal;
			var.Clear();			
			//获取行业名称字段值
			rs.GetFieldValue(1, vocation);	
			InsertConfigItem(&m_listVocation,id,vocation);
			rs.MoveNext();	
		}
		rs.Close();
		//打开所有的客户信息记录
		rs.Open(CRecordset::dynaset, "select * from customer_info_tab order by id");
		while (!rs.IsEOF()) {
			int id;
			CString name,area,profession,vocation,company;
			CString approach,email,phone,mobile,interest,memo;
			CDBVariant var;
			//获取客户信息ID字段值
			rs.GetFieldValue((short)0, var, SQL_C_SLONG);
			if (var.m_dwType != DBVT_NULL)	
				id = var.m_iVal;
			var.Clear();			
			//获取姓名字段值
			rs.GetFieldValue(1, name);
			//获取地区信息字段值
			rs.GetFieldValue(2, area);
			//获取职业字段值
			rs.GetFieldValue(3, profession);
			//获取行业字段值
			rs.GetFieldValue(4, vocation);
			//获取所在单位字段值
			rs.GetFieldValue(5, company);
			//获取结识途径字段值
			rs.GetFieldValue(6, approach);
			//获取email字段值
			rs.GetFieldValue(7, email);
			//获取固定电话字段值
			rs.GetFieldValue(8, phone);
			//获取移动电话字段值
			rs.GetFieldValue(9, mobile);
			//获取爱好字段值
			rs.GetFieldValue(10, interest);
			//获取备注字段值
			rs.GetFieldValue(11, memo);
			//向客户信息列表框控件中加入新的一行信息.
			InsertHRInfoItem(id,name,area,profession,vocation,company,approach,
				email,phone,mobile,interest,memo);
			rs.MoveNext();	
		}
		rs.Close();
		//更新组合框的数据
		RefreshAreaComboData();
		RefreshApprComboData();
		RefreshProfComboData();
		RefreshVocComboData();
	}
	CATCH(CDBException,ex)
	{
		AfxMessageBox (ex->m_strError);
		AfxMessageBox (ex->m_strStateNativeOrigin);		
	}
	AND_CATCH(CMemoryException,pEx)
	{
		pEx->ReportError();
		AfxMessageBox ("memory exception");
	}
	AND_CATCH(CException,e)
	{
		TCHAR szError[100];
		e->GetErrorMessage(szError,100);
		AfxMessageBox (szError);
	}
	END_CATCH   			
}

void CCRDBSDlg::InsertConfigItem(CListCtrl* pList, int id, CString name)
{
	//获取当前的纪录条数.
	int nIndex = pList->GetItemCount();
	LV_ITEM lvItem;
	lvItem.mask = LVIF_TEXT ;	
	//行数
	lvItem.iItem = nIndex;				
	lvItem.iSubItem = 0;
	CString temp ;
	temp.Format("%d",id);
	//第一列
	lvItem.pszText = (char*)(LPCTSTR)temp;		
	//在最后一行插入记录值.
	pList->InsertItem(&lvItem);	
	//设置该行的其他列的值.
	pList->SetItemText(nIndex,1,name);
}

void CCRDBSDlg::RefreshAreaComboData()
{
	m_comboArea.ResetContent();
	TRY{
		CRecordset rs(&m_db);
		//打开所有的地区信息记录.
		rs.Open(CRecordset::dynaset, "select * from area_info_tab");
		while (!rs.IsEOF()) {
			CString strName;
			//获取地区信息名称字段值
			rs.GetFieldValue(1, strName);
			//向地区信息名称组合框添加地区信息名称.
			m_comboArea.AddString(strName);
			rs.MoveNext();	
		}
		m_comboArea.SetCurSel(0);
	}
	CATCH(CDBException,ex)
	{
		AfxMessageBox (ex->m_strError);
		AfxMessageBox (ex->m_strStateNativeOrigin);		
	}
	AND_CATCH(CMemoryException,pEx)
	{
		pEx->ReportError();
		AfxMessageBox ("memory exception");
	}
	AND_CATCH(CException,e)
	{
		TCHAR szError[100];
		e->GetErrorMessage(szError,100);
		AfxMessageBox (szError);
	}
	END_CATCH   		
}

void CCRDBSDlg::RefreshApprComboData()
{
	m_comboApproach.ResetContent();
	TRY{
		CRecordset rs(&m_db);
		//打开所有的结识途径信息记录.
		rs.Open(CRecordset::dynaset, "select * from approach_info_tab");
		while (!rs.IsEOF()) {
			CString strName;
			//获取结识途径信息名称字段值