embarksysdlg.cpp

使用Visual C++ .NET实现简单了一个票务管理系统

// EmbarkSysDlg.cpp : 实现文件
//

#include "stdafx.h"
#include "EmbarkSys.h"
#include "EmbarkSysDlg.h"
#include "DBSetDlg.h"
#include ".\embarksysdlg.h"
#include "Tools.h"

#ifdef _DEBUG
#define new DEBUG_NEW
#endif


// 用于应用程序“关于”菜单项的 CAboutDlg 对话框

class CAboutDlg : public CDialog
{
public:
	CAboutDlg();

// 对话框数据
	enum { IDD = IDD_ABOUTBOX };

	protected:
	virtual void DoDataExchange(CDataExchange* pDX);    // DDX/DDV 支持

// 实现
protected:
	DECLARE_MESSAGE_MAP()
};

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

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

BEGIN_MESSAGE_MAP(CAboutDlg, CDialog)
END_MESSAGE_MAP()


// CEmbarkSysDlg 对话框



CEmbarkSysDlg::CEmbarkSysDlg(CWnd* pParent /*=NULL*/)
	: CDialog(CEmbarkSysDlg::IDD, pParent)
	, m_Fi(_T(""))
	, m_BoardingID(0)
	, m_Pass(_T(""))
{
	m_hIcon = AfxGetApp()->LoadIcon(IDR_MAINFRAME);
	char c[256];
	CString temp;
	::GetCurrentDirectory( 256, c );
	temp.Format("%s\\", c );
	m_IniFile = temp + "EmbarkSys.ini";
}

void CEmbarkSysDlg::DoDataExchange(CDataExchange* pDX)
{
	CDialog::DoDataExchange(pDX);
	DDX_Text(pDX, IDC_EDIT1, m_Fi);
	DDX_Text(pDX, IDC_EDIT2, m_BoardingID);
	DDX_Text(pDX, IDC_EDIT3, m_Pass);
	DDX_Control(pDX, IDC_BUTTON2, m_BtTest);
}

BEGIN_MESSAGE_MAP(CEmbarkSysDlg, CDialog)
	ON_WM_SYSCOMMAND()
	ON_WM_PAINT()
	ON_WM_QUERYDRAGICON()
	//}}AFX_MSG_MAP
	ON_BN_CLICKED(IDC_BUTTON3, OnBnClickedButton3)
	ON_BN_CLICKED(IDC_BUTTON1, OnBnClickedButton1)
	ON_BN_CLICKED(IDC_BUTTON2, OnBnClickedButton2)
END_MESSAGE_MAP()


// CEmbarkSysDlg 消息处理程序

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

	// 将\“关于...\”菜单项添加到系统菜单中。
	LoadDBSet();

	// IDM_ABOUTBOX 必须在系统命令范围内。
	ASSERT((IDM_ABOUTBOX & 0xFFF0) == IDM_ABOUTBOX);
	ASSERT(IDM_ABOUTBOX < 0xF000);

	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);
		}
	}

	// 设置此对话框的图标。当应用程序主窗口不是对话框时，框架将自动
	//  执行此操作
	SetIcon(m_hIcon, TRUE);			// 设置大图标
	SetIcon(m_hIcon, FALSE);		// 设置小图标

	// TODO: 在此添加额外的初始化代码
	m_BtTest.EnableWindow(false);
	
	return TRUE;  // 除非设置了控件的焦点，否则返回 TRUE
}

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

// 如果向对话框添加最小化按钮，则需要下面的代码
//  来绘制该图标。对于使用文档/视图模型的 MFC 应用程序，
//  这将由框架自动完成。

void CEmbarkSysDlg::OnPaint() 
{
	if (IsIconic())
	{
		CPaintDC dc(this); // 用于绘制的设备上下文

		SendMessage(WM_ICONERASEBKGND, reinterpret_cast<WPARAM>(dc.GetSafeHdc()), 0);

		// 使图标在工作矩形中居中
		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;

		// 绘制图标
		dc.DrawIcon(x, y, m_hIcon);
	}
	else
	{
		CDialog::OnPaint();
	}
}

//当用户拖动最小化窗口时系统调用此函数取得光标显示。
HCURSOR CEmbarkSysDlg::OnQueryDragIcon()
{
	return static_cast<HCURSOR>(m_hIcon);
}
// 读去数据库配置参数
void CEmbarkSysDlg::LoadDBSet()
{
	char tmp[256];
	GetPrivateProfileString("DBSET","DBTYPE","0",tmp,256,m_IniFile);
	m_DBData.type = atol(tmp);
	GetPrivateProfileString("DBSET","DBSOURCE","",tmp,256,m_IniFile);
	m_DBData.Source = tmp;
	m_DBData.Source.Trim();
	GetPrivateProfileString("DBSET","USERNAME","",tmp,256,m_IniFile);
	m_DBData.UserName = tmp;
	m_DBData.UserName.Trim();
	CTools * ptool = NULL;
	GetPrivateProfileString("DBSET","PASSWORD","",tmp,256,m_IniFile);
	m_DBData.PassWord = ptool->GetPriString( tmp, false );

	if( m_DBData.Source != "" )
	{
		CString jet = "";
		switch( m_DBData.type )
		{
		case 0: // Access
			jet = "Microsoft.Jet.OLEDB.4.0";
			break;
		case 1: // Oracle
			jet = "MSDAORA";
			break;
		default:
			jet = "Microsoft.Jet.OLEDB.4.0";
			break;
		}
		m_DBData.Linkbuf.Format( "Provider=%s;Data Source=%s",jet,m_DBData.Source);
	}
}
// 数据库配置
void CEmbarkSysDlg::OnBnClickedButton3()
{
	CDBSetDlg dlg;
	dlg.SetData(m_DBData.type,m_DBData.Source,m_DBData.UserName,m_DBData.PassWord,m_IniFile );
	if( dlg.DoModal() == IDOK )
	{
		LoadDBSet();
	}
}
// 确认航班
void CEmbarkSysDlg::OnBnClickedButton1()
{
	if( UpdateData() )
	{
		SYSTEMTIME SysTime;
		GetLocalTime(&SysTime);
		m_Year = SysTime.wYear;
		m_Month = SysTime.wMonth;
		m_Day = SysTime.wDay;
		m_BtTest.EnableWindow(true);
	}
}
// 验证是否在本登机口登机
void CEmbarkSysDlg::OnBnClickedButton2()
{
	if( !UpdateData() )
		return;
	if( m_BoardingID == 0 )
	{
		MessageBox("请输入登机牌号");
		return ;
	}

	if( BInPlane( m_BoardingID ) )
	{
		m_Pass = "可以登机";
	}
	else
	{
		m_Pass = "不可以登机";
	}
	UpdateData(false);
}
// 是否在本登机口登机
bool CEmbarkSysDlg::BInPlane(int id)
{
	_ConnectionPtr pConnection;
	_RecordsetPtr pRecordset;
	CString sql,temp;

	try
	{
		HRESULT hr;

		// 创建Connection对象
		hr = pConnection.CreateInstance("ADODB.Connection");
		if( SUCCEEDED( hr ) )
		{
			// 连接数据库
			hr = pConnection->Open(m_DBData.Linkbuf.GetBuffer(),
				m_DBData.UserName.GetBuffer(),m_DBData.PassWord.GetBuffer(),
				adModeUnknown);
		}
		else
		{
			MessageBox("创建数据库连接失败","失败",MB_OK);
			return false;
		}
	}
	catch( ... )
	{
		MessageBox( "连接数据库失败","失败",MB_OK);
		return false;
	}

	try
	{
		// 生成Recordset实例
		pRecordset.CreateInstance("ADODB.Recordset");
		sql.Format("SELECT Boarding.BoardingID, Boarding.BOnPlane, SaleTicketNote.FlightID, SaleTicketNote.Date FROM SaleTicketNote INNER JOIN Boarding ON SaleTicketNote.ID = Boarding.ID WHERE (((Boarding.BoardingID)=%d) AND ((Boarding.ID)=[SaleTicketNote].[ID]))",id);
		pRecordset->Open( sql.GetBuffer(),
			_variant_t((IDispatch*)pConnection,true),adOpenStatic,adLockOptimistic,adCmdText);
	}
	catch( _com_error * e )
	{
		pConnection->Close();
		MessageBox( e->ErrorMessage(),"异常",MB_OK );
		return false;
	}

	_variant_t value;
	COleDateTime t;
	bool bOn;
	CString fi;

	bool b = true;
	if( !pRecordset->adoEOF )
	{
		try
		{
			value = pRecordset->GetCollect("BOnPlane");
			if( value.vt != VT_NULL )
				bOn = value.boolVal;
			else
				bOn = false;
			value = pRecordset->GetCollect("FlightID");
			if( value.vt != VT_NULL )
				fi = value.bstrVal;
			else
				fi = "";
			value = pRecordset->GetCollect("Date");
			if( value.vt != VT_NULL )
				t = value.date;
		}
		catch(...)
		{
			MessageBox("读取记录异常","异常",MB_OK );
			b = false;
		}
	}
	else
	{
		MessageBox("没有找到该登机牌信息");
		b = false;
	}
	// 检查旅客是否在正确的登机口登机
	if( b )
	{
		if( bOn )
		{
			MessageBox("该登机牌已经登机");
			b = false;
		}
		else if( m_Fi != fi )
		{
			MessageBox("航班号不正确");
			b = false;
		}
		else if( m_Year != t.GetYear() || m_Month != t.GetMonth() || m_Day != t.GetDay() )
		{
			MessageBox("登机日期错误");
			b = false;
		}
	}
	UpdateData(false);

	// 将登机牌改为已经登机
	if( b )
	{
		try
		{
			pRecordset->PutCollect("BOnPlane",_variant_t(true));
			pRecordset->Update();
		}
		catch(...)
		{
			MessageBox("改写记录异常","异常",MB_OK );
			b = false;
		}
	}
	try
	{
		pRecordset->Close();
		pConnection->Close();
	}
	catch( _com_error * e )
	{
		MessageBox(e->ErrorMessage(),"失败",MB_OK );
		b = false;
	}
	return b;
}