rentdvddlg.cpp

基于ADO的简单图书借阅数据库程序

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

#include "stdafx.h"
#include "Rent.h"
#include "RentDVDDlg.h"
#include ".\rentdvddlg.h"


// CRentDVDDlg 对话框

IMPLEMENT_DYNAMIC(CRentDVDDlg, CDialog)
CRentDVDDlg::CRentDVDDlg(CWnd* pParent /*=NULL*/)
	: CDialog(CRentDVDDlg::IDD, pParent)
	, m_name(_T(""))
{
}

CRentDVDDlg::~CRentDVDDlg()
{
}

void CRentDVDDlg::DoDataExchange(CDataExchange* pDX)
{
	CDialog::DoDataExchange(pDX);
	DDX_Control(pDX, IDC_DATETIMEPICKER_RENT, m_DateTimeRent);
	DDX_Text(pDX, IDC_EDIT_NAME, m_name);
	DDX_Control(pDX, IDC_EDIT_NAME, m_editName);
	DDX_Control(pDX, IDC_LIST_DVD, m_DVDInfoList);
}


BEGIN_MESSAGE_MAP(CRentDVDDlg, CDialog)
	ON_BN_CLICKED(IDC_BUTTON_QUERY, OnOK)
	ON_BN_CLICKED(IDC_BUTTON1, OnCancel)
END_MESSAGE_MAP()


// CRentDVDDlg 消息处理程序
BOOL CRentDVDDlg::OnInitDialog()
{   
	CDialog::OnInitDialog();

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

	// 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);		// 设置小图标

	m_DVDInfoList.InsertColumn(0,"ID",LVCFMT_CENTER,60);
    m_DVDInfoList.InsertColumn(1,"影碟",LVCFMT_CENTER,100);
    m_DVDInfoList.InsertColumn(2,"目前数量",LVCFMT_CENTER,80);
	m_DVDInfoList.InsertColumn(3,"内容描述",LVCFMT_CENTER,170);
    m_DVDInfoList.SetExtendedStyle(LVS_EX_FULLROWSELECT|LVS_EX_GRIDLINES);


	HRESULT hr;
	try
	{
		hr=m_pConnection.CreateInstance(__uuidof(Connection));
		if (SUCCEEDED(hr))
		{
			hr=m_pConnection->Open("Provider=Microsoft.Jet.OLEDB.4.0;Data Source=D:\\Admin 的文档\\Visual Studio Projects\\练习小程序\\Rent\\DVDRentDB.mdb","","",adConnectUnspecified);
			if (FAILED(hr))
			{
				AfxMessageBox("open fail!");
				return TRUE;
			}

		} 
		else
		{
			AfxMessageBox("createinstance of Connection fail!");
			return TRUE;
		}
	}
	catch (_com_error e)
	{
		_bstr_t bstrSource(e.Source());
		_bstr_t bstrDescription(e.Description());
		AfxMessageBox(bstrSource+bstrDescription);
		return TRUE;	
	}

	
	InitListCtr();

	return TRUE;

}

void CRentDVDDlg::InitListCtr()
{  
	_RecordsetPtr pDVDRecordset;
	pDVDRecordset.CreateInstance(__uuidof(Recordset));
	try
	{   
		pDVDRecordset->Open("SELECT * FROM tbDVDInfo",m_pConnection.GetInterfacePtr(),adOpenDynamic,adLockOptimistic,adCmdText);
	}
	catch (_com_error *e)
	{
		AfxMessageBox(e->ErrorMessage());
		return;
	}
	_variant_t var;
	CString strValue;
	int curItem=0;
	try
	{
		while (!pDVDRecordset->adoEOF)
		{
			var=pDVDRecordset->Fields->GetItem(long(0))->GetValue();
			if (var.vt!=VT_NULL)
			    strValue=(LPCSTR)_bstr_t(var);
			m_DVDInfoList.InsertItem(curItem,strValue);

			var=pDVDRecordset->Fields->GetItem(long(1))->GetValue();
			if (var.vt!=VT_NULL)
				strValue=(LPCSTR)_bstr_t(var);
			m_DVDInfoList.SetItemText(curItem,1,strValue);

			var=pDVDRecordset->Fields->GetItem(long(2))->GetValue();
			if (var.vt!=VT_NULL)
				strValue=(LPCSTR)_bstr_t(var);
			m_DVDInfoList.SetItemText(curItem,2,strValue);

			var=pDVDRecordset->Fields->GetItem(long(3))->GetValue();
			if (var.vt!=VT_NULL)
				strValue=(LPCSTR)_bstr_t(var);
			m_DVDInfoList.SetItemText(curItem,3,strValue);

			pDVDRecordset->MoveNext();
			curItem++;
		}
	}
	catch (_com_error *e)
	{
		AfxMessageBox(e->ErrorMessage());
	}
	pDVDRecordset->Close();
	pDVDRecordset=NULL;

}


void CRentDVDDlg::MinusDVDNum(CString strDVDID)
{
	_RecordsetPtr pDVDRecordset;
    pDVDRecordset.CreateInstance(__uuidof(Recordset));

	_bstr_t vSQL;
	vSQL="select *from tbDVDInfo where DVDID="+strDVDID;
	try
	{
		pDVDRecordset->Open(vSQL,m_pConnection.GetInterfacePtr(),adOpenDynamic,adLockOptimistic,adCmdText);

	}
	catch (_com_error *e)
	{
		AfxMessageBox(e->ErrorMessage());
		return;
	}
	if ((pDVDRecordset->BOF)&&(pDVDRecordset->adoEOF))
	{
		MessageBox("error!");
		pDVDRecordset->Close();
		pDVDRecordset=NULL;
		return;
	}

	_variant_t var;
	CString strValue;
	int dvdNum;
	var=pDVDRecordset->GetCollect("Num");
	if (var.vt!=VT_NULL)
	{
		strValue=(LPCSTR)_bstr_t(var);
		dvdNum=atoi(strValue);
		dvdNum-=1;
		strValue.Format("%d",dvdNum);
		pDVDRecordset->PutCollect("Num",_variant_t(strValue));
		pDVDRecordset->Update();
	}

	pDVDRecordset->Close();
	pDVDRecordset=NULL;

}


void CRentDVDDlg::OnOK()
{
	// TODO: 在此添加控件通知处理程序代码
	UpdateData(TRUE);
	CString strDVDID,strDate;
	int sel=m_DVDInfoList.GetSelectionMark();
	if (sel<0)
	{
		MessageBox("请选择租借的DVD!");
		return;
	}
	else
		strDVDID=m_DVDInfoList.GetItemText(sel,0);
	if (m_DVDInfoList.GetItemText(sel,2)=='0')
	{
		MessageBox("抱歉，该影碟已经借空!");
		return;
	}
	if (m_name.IsEmpty())
	{
        MessageBox("请填写租借人姓名!","提示",MB_OK|MB_ICONINFORMATION);
	    m_editName.SetFocus();
		return;
	}
	GetDlgItem(IDC_DATETIMEPICKER_RENT)->GetWindowText(strDate);
	MessageBox(strDate+strDVDID+m_name);

	_RecordsetPtr pRentRecordset;
	pRentRecordset.CreateInstance(__uuidof(Recordset));
	HRESULT hr;
	try
	{
		hr=pRentRecordset->Open("select * from tbRentInfo",m_pConnection.GetInterfacePtr(),adOpenDynamic,adLockOptimistic,adCmdText);
        if (SUCCEEDED(hr))
        {
   			pRentRecordset->AddNew();
			pRentRecordset->PutCollect("DVDID",_variant_t(strDVDID));
			pRentRecordset->PutCollect("Name",_variant_t(m_name));
			pRentRecordset->PutCollect("Date",_variant_t(strDate));
			pRentRecordset->Update();
	
        }
	}
	catch (_com_error *e)
	{
		AfxMessageBox(e->ErrorMessage());
		return;
	}
	pRentRecordset->Close();
	pRentRecordset=NULL;

	MinusDVDNum(strDVDID);

}


/*
void CRentDVDDlg::OnOK()
{
   UpdateData(TRUE);
   CString strDVDID,strDate,strSQL;
   GetDlgItem(IDC_DATETIMEPICKER_RENT)->GetWindowText(strDate);
   int sel=m_DVDInfoList.GetSelectionMark();
   if (sel<0)
   {
	   MessageBox("请选择租借的DVD!");
	   return;
   }
   else
	   strDVDID=m_DVDInfoList.GetItemText(sel,0);
   if (m_DVDInfoList.GetItemText(sel,2)=='0')
   {
	   MessageBox("抱歉，该影碟已经借空!");
	   return;
   }
   if (m_name.IsEmpty())
   {
	   MessageBox("请填写租借人姓名!","提示",MB_OK|MB_ICONINFORMATION);
	   m_editName.SetFocus();
	   return;
   }
   

   _CommandPtr pCommand;
   pCommand.CreateInstance(__uuidof(Command));
   pCommand->ActiveConnection=m_pConnection;
   strSQL.Format("insert into tbRentInfo(DVDID,Name,Date) values (%s,'%s','%s')",strDVDID,m_name,strDate);      //出现异常！！！！！！
   pCommand->CommandText=_bstr_t(strSQL);

   HRESULT hr;
   try
   {
	   hr=pCommand->Execute(NULL,NULL,adCmdText);
	   if (SUCCEEDED(hr))
		   MinusDVDNum(strDVDID);
   }
   catch (_com_error *e)
   {
	   AfxMessageBox(e->ErrorMessage());
	   return; 	
   }

}

*/

void CRentDVDDlg::OnCancel()
{
	// TODO: 在此添加控件通知处理程序代码
	this->EndDialog(IDCANCEL);//关闭当前的对话框，并以IDCANCEL返回，表明用户是用取消来关闭对话框的
}