bookdialog.cpp

一个操作系统源代码

// BookDialog.cpp : implementation file
//

#include "stdafx.h"
#include "SuperWorld.h"
#include "BookDialog.h"
#include "CreateCardDlg.h"
#include "PropertyDlg.h"
#include "FindDlg.h"
#include "SendMail.h"

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

/////////////////////////////////////////////////////////////////////////////
// CBookDialog dialog


CBookDialog::CBookDialog(CWnd* pParent /*=NULL*/)
	: CDialog(CBookDialog::IDD, pParent)
{
	//{{AFX_DATA_INIT(CBookDialog)
		// NOTE: the ClassWizard will add member initialization here
	//}}AFX_DATA_INIT
}


void CBookDialog::DoDataExchange(CDataExchange* pDX)
{
	CDialog::DoDataExchange(pDX);
	//{{AFX_DATA_MAP(CBookDialog)
//	DDX_Control(pDX, IDC_LIST_GROUP, m_list_group);
	DDX_Control(pDX, IDC_LIST_DATA, m_list);
	//}}AFX_DATA_MAP
}


BEGIN_MESSAGE_MAP(CBookDialog, CDialog)
	//{{AFX_MSG_MAP(CBookDialog)
	ON_WM_DESTROY()
	ON_BN_CLICKED(IDC_BUTTON_MEMBER, OnButtonMember)
	ON_BN_CLICKED(IDC_BUTTON_DELETE, OnButtonDelete)
	ON_BN_CLICKED(IDC_BUTTON_PROPERTY, OnButtonProperty)
	ON_BN_CLICKED(IDC_BUTTON_FIND, OnButtonFind)
	ON_BN_CLICKED(IDC_BUTTON_EMAIL, OnButtonEmail)
	ON_BN_CLICKED(IDC_BUTTON_BACK, OnButtonBack)
	ON_BN_CLICKED(IDC_BUTTON_FONT, OnButtonFont)
	//}}AFX_MSG_MAP
END_MESSAGE_MAP()

/////////////////////////////////////////////////////////////////////////////
// CBookDialog message handlers

void CBookDialog::OnOK() 
{
	// TODO: Add extra validation here
	
}

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

//	m_btnCreateGroup.SubclassDlgItem(IDC_BUTTON_GROUP, this);
//	m_btnCreateGroup.SetIcon(IDI_GROUP); 
	
	m_btnCreateMember.SubclassDlgItem(IDC_BUTTON_MEMBER, this);
	m_btnCreateMember.SetIcon(IDI_MEMBER); 
	
	m_btnEmail.SubclassDlgItem(IDC_BUTTON_EMAIL, this);
	m_btnEmail.SetIcon(IDI_MAIL); 
	
	m_btnProperty.SubclassDlgItem(IDC_BUTTON_PROPERTY, this);
	m_btnProperty.SetIcon(IDI_PROPERTY); 
	
	m_btnDelete.SubclassDlgItem(IDC_BUTTON_DELETE, this);
	m_btnDelete.SetIcon(IDI_DEL); 
	
	m_btnFind.SubclassDlgItem(IDC_BUTTON_FIND, this);
    m_btnFind.SetIcon(IDI_FIND); 

	m_btnBack.SubclassDlgItem(IDC_BUTTON_BACK, this);
//    m_btnBack.SetIcon(IDI_BACK); 
	m_btnFont.SubclassDlgItem(IDC_BUTTON_FONT, this);
  //  m_btnFont.SetIcon(IDI_FONT); 

	m_list.SetBkColor(RGB(0,128,128));
	m_list.SetTextBkColor(RGB(0,128,128));
	m_list.SetTextColor(RGB(255,255,0));

	m_list.SetExtendedStyle( LVS_EX_GRIDLINES | LVS_EX_FULLROWSELECT | 
		LVS_EX_HEADERDRAGDROP );
	TCHAR szBuf[20];
	LV_COLUMN lvc;
	
	int i;
	for ( i = 0; i < 9; i++ )
	{
		lvc.cx       = 48+14*i;
		switch(i)
		{
			case 0:
				wsprintf(szBuf, _T("姓名"));
				break;
			case 1:
				wsprintf(szBuf, _T("EMAIL") );
				lvc.cx = 200;
				break;
			case 2:
				wsprintf(szBuf, _T("OICQ") );
				break;
			case 3:
				wsprintf(szBuf, _T("手机号码") );
				break;
			case 4:
				wsprintf(szBuf, _T("电话号码") );
				break;
			case 5:
				wsprintf(szBuf, _T("生日") );
				break;
			case 6:
				wsprintf(szBuf, _T("工作单位") );
				lvc.cx = 200;
				break;
			case 7:
				wsprintf(szBuf, _T("个人主页") );
				lvc.cx = 200;
				break;
			case 8:
				wsprintf(szBuf, _T("备注") );
				lvc.cx = 200;
				break;

		}
		lvc.mask     = LVCF_FMT | LVCF_SUBITEM | LVCF_TEXT | LVCF_WIDTH;
		lvc.fmt      = LVCFMT_LEFT;
		lvc.pszText  =szBuf;
		lvc.iSubItem = i;         
		//lvc.cx       = 48+14*i;
		m_list.InsertColumn( i, &lvc );
	}	

	// create, initialize, and hook up image list
//	m_pImageList = new CImageList();
//	ASSERT(m_pImageList != NULL);    // serious allocation failure checking
//	m_pImageList->Create(32, 32, TRUE,   4, 4);
//	CSuperWorldApp *pApp = (CSuperWorldApp*)AfxGetApp();
//	m_pImageList->Add(pApp->LoadIcon(IDI_ICONLIST1));
//	m_pImageList->Add(pApp->LoadIcon(IDI_ICONLIST2));
//	m_list_group.SetImageList(m_pImageList, LVSIL_NORMAL);


	
	m_pDB=NULL;
	OpenDatabase();

	RefreshData();

	return TRUE;  // return TRUE unless you set the focus to a control
	              // EXCEPTION: OCX Property Pages should return FALSE
}

int CBookDialog::openDatabase(CDatabase **ppDatabase, CString fileName,
				  BOOL bReportNoOpen /* = TRUE */)
{
	// initialize success indicator
	int nReturnCode = 1;

	// close and delete if necessary
	if (*ppDatabase != NULL)
	{
		if ((*ppDatabase)->IsOpen())
			closeDatabase(ppDatabase);
		delete *ppDatabase;
	}

	// construct new database
	*ppDatabase = new CDatabase;

	// failed to allocate
	if (ppDatabase == NULL)
		return -1; // fatal error

	// now open the database object with error checking
	try
	{
		(*ppDatabase)->Open(fileName,FALSE,FALSE,"ODBC;");

	}
	catch (CDBException *e)
	{
        AfxMessageBox(e->m_strError);
        
		// not rethrowing, so delete exception                        	
		e->Delete();

		delete *ppDatabase;
		*ppDatabase = NULL;
	}
	catch (CMemoryException *e)
	{
		// output status                                              	
		AfxMessageBox(_T("Failed to open database--Memory exception thrown."));                                       	

		// not rethrowing, so delete exception                        	
		e->Delete();

		delete *ppDatabase;
		*ppDatabase = NULL;

		// indicate fatal error
		nReturnCode = -1;
	}

	return nReturnCode;
}

void CBookDialog::closeDatabase(CDatabase **ppDatabase)
{
	// only process if the database object exists
	if (*ppDatabase != NULL)
	{
		if ((*ppDatabase)->IsOpen())
			(*ppDatabase)->Close();
		
		// closing doesn't delete the object
		delete *ppDatabase;
		*ppDatabase = NULL;
	}
}
void CBookDialog::OpenInitDatabase(CString szDatabase)
{
	openDatabase(&m_pDB,szDatabase,TRUE);
	try
	{
		m_dataRecset = new CBookDataSet(m_pDB);
		m_dataRecset->Open (CRecordset::snapshot,"Select * from BookData");
	}
	catch(CException* e)
	{
		e->ReportError ();
		e->Delete ();
		if(m_dataRecset != NULL)
		{
			if(m_dataRecset->IsOpen ())
				m_dataRecset->Close ();
			delete m_dataRecset;
			m_dataRecset = NULL;
		}
		closeDatabase(&m_pDB);
	}

}
BOOL CBookDialog::InitODBCEnvironment(char *szPathName)
{
	TCHAR	szDesc[2048];
	LPCSTR	lpszDriver;
	HMODULE hmodule;
	int		nLen;
	int ch='\\';
    CString szTemp,szTemp1;
	szTemp.Empty();
	szTemp1.Empty();
	szTemp = szPathName;
	int result = szTemp.ReverseFind(ch);
    szTemp1 = szTemp.Left(result);

	// check if the driver is install and construct the create description string
	if (hmodule = ::LoadLibrary(_T("odbcjt32.dll")))
	{
		_stprintf(szDesc, _T("DSN=%s+ DESCRIPTION=%s+ DBQ=%s+ DEFAULTDIR=%s++ "), 
				  DSNNAME, DSNNAME, szPathName, szTemp1);

		lpszDriver = "Microsoft Access Driver (*.mdb)\0";
		::FreeLibrary(hmodule);
	}
	else
	{
		::MessageBox(NULL, _T("找不到ODBC驱动程序,请安装\nMicrosoft Access Driver"), 
					 _T("错误信息"), MB_OK | MB_ICONERROR);

		return FALSE;
	}

	nLen = _tcslen(szDesc);
	for (int i=0; i<nLen; i++)
	{
		if (szDesc[i] == _T('+'))
			szDesc[i] = 0;
	}

	// create the odbc data source
	if (!::SQLConfigDataSource(NULL, ODBC_ADD_DSN, lpszDriver, (LPCSTR)szDesc))
	{
		::MessageBox(NULL, _T("创建ODBC数据源失败"), _T("错误信息"), MB_OK | MB_ICONERROR);
		return FALSE;
	}

	return TRUE;
}

BOOL CBookDialog::CloseODBCEnvironment(char *szPathName)
{
	TCHAR szDesc[MAX_PATH];
	LPCSTR lpszDriver;
	int nLen, i;
	int ch='\\';
    CString szTemp,szTemp1;
	szTemp.Empty();
	szTemp1.Empty();
	szTemp = szPathName;
	int result = szTemp.ReverseFind(ch);
    szTemp1 = szTemp.Left(result);
	_stprintf(szDesc, _T("DSN=%s+ DESCRIPTION=%s+ DBQ=%s++ "), DSNNAME, DSNNAME,szTemp1);
		
	lpszDriver = "Microsoft Access Driver (*.mdb)\0";

	nLen = _tcslen(szDesc);
	for (i=0; i<nLen; i++)
	{
		if (szDesc[i] == _T('+'))
			szDesc[i] = 0;
	}
	BOOL bRes=::SQLConfigDataSource(NULL, ODBC_REMOVE_DSN, lpszDriver, (LPCSTR)szDesc);
	if(!bRes)
		return FALSE;
	return TRUE;
}
void CBookDialog::OpenDatabase()
{
	TCHAR szTempPath[1024];
	TCHAR szBuffer[400];
    memset(szBuffer,0,sizeof(szBuffer));
	memset(szTempPath,0,sizeof(szTempPath));
	CSuperWorldApp *pApp = (CSuperWorldApp *)AfxGetApp();
	if(::GetModuleFileName(NULL,szBuffer,MAX_PATH)!=0)
	{
		pApp->GetCurDir(szBuffer,szTempPath);
	}