payitems.cpp

这是一个功能相对完善的医院收费管理系统 的一个例子

// PayItems.cpp: implementation of the CPayItems class.
//
//////////////////////////////////////////////////////////////////////

#include "stdafx.h"
#include "HosptialMan.h"
#include "ADOConn.h"
#include "PayItems.h"

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

//////////////////////////////////////////////////////////////////////
// Construction/Destruction
//////////////////////////////////////////////////////////////////////

CPayItems::CPayItems()
{

}

CPayItems::~CPayItems()
{

}
//				方法：添加、修改、删除
void CPayItems::sql_Insert()
{
	try
	{
		//连接数据库
		ADOConn m_AdoConn;
		//设置INSERT语句, 将数值转换为字符串
		CString cSql,cRId,cItemId,cNum,cPrc,cTId;
		_bstr_t bSql;
		cRId.Format("%ld",RegId);
		cItemId.Format("%ld",ItemId);
		cNum.Format("%f",PNum);
		cPrc.Format("%f",Price);
		cTId.Format("%d",PType);
		// 更新语句
		cSql = "Insert Into PayItems(RegId,ItemId,PNum,Price,PType) "
			" Values("+cRId+","+cItemId+","+cNum+","+cPrc+","+cTId+")";
//		AfxMessageBox(cSql);
		bSql = (LPCTSTR)(_bstr_t)cSql;
		m_AdoConn.ExecuteSQL(bSql);
		//断开与数据库的连接
		m_AdoConn.ExitConnect();
	}
	// 捕捉异常
	catch(_com_error e)
	{
		// 显示错误信息
		AfxMessageBox(e.Description());
	}
}
void CPayItems::sql_Update(CString cPId)
{
	try
	{
		//连接数据库
		ADOConn m_AdoConn;
		//设置Update语句, 将数值转换为字符串
		CString cSql,cRId,cItemId,cNum,cPrc,cTId;
		_bstr_t bSql;
		cRId.Format("%ld",RegId);
		cItemId.Format("%ld",ItemId);
		cNum.Format("%f",PNum);
		cPrc.Format("%f",Price);
		cTId.Format("%d",PType);
		// 更新语句
		cSql = "Update PayItems Set RegId="+cRId+",ItemId="+cItemId
			+",PNum="+cNum+",PType="+cTId+",Price="+cPrc
			+" Where PayId="+cPId;
		bSql = (LPCTSTR)(_bstr_t)cSql;
		m_AdoConn.ExecuteSQL(bSql);
		//断开与数据库的连接
		m_AdoConn.ExitConnect();
	}
	// 捕捉异常
	catch(_com_error e)
	{
		// 显示错误信息
		AfxMessageBox(e.Description());
	}
}
// 删除单个记录
void CPayItems::sql_Delete(CString cPId)
{
	try
	{
		//连接数据库
		ADOConn m_AdoConn;
		//设置Delete语句
		_bstr_t bSql;
		bSql = "Delete From PayItems Where PayId="+cPId;
		m_AdoConn.ExecuteSQL(bSql);
		//断开与数据库的连接
		m_AdoConn.ExitConnect();
	}
	// 捕捉异常
	catch(_com_error e)
	{
		// 显示错误信息
		AfxMessageBox(e.Description());
	}
}
// 删除多个记录
void CPayItems::sql_DeleteRecords(CString cRId)
{
	try
	{
		//连接数据库
		ADOConn m_AdoConn;
		//设置Delete语句
		_bstr_t bSql;
		bSql = "Delete From PayItems Where RegId="+cRId;
		m_AdoConn.ExecuteSQL(bSql);
		//断开与数据库的连接
		m_AdoConn.ExitConnect();
	}
	// 捕捉异常
	catch(_com_error e)
	{
		// 显示错误信息
		AfxMessageBox(e.Description());
	}
}

double CPayItems::GetSum(CString cRId)
{
	double dRSum = 0;
	try
	{
		_variant_t vRSum;
		// 指明数据类型为double
		vRSum.vt = VT_R8;
		_RecordsetPtr m_pRecordset;
		// 连接数据库
		ADOConn m_AdoConn;
		_bstr_t bSQL;
		bSQL = "SELECT SUM(Price*PNum) AS RSum FROM PayItems WHERE RegId="+cRId+" GROUP BY RegId";
		// 执行SELETE语句
		m_pRecordset = m_AdoConn.GetRecordSet(bSQL);
		// 如果结果集为空则返回0
		if(!m_pRecordset->adoEOF)
		{
			vRSum = m_pRecordset->GetCollect("RSum");
			dRSum = vRSum.dblVal;
		}
		//断开与数据库的连接
		m_AdoConn.ExitConnect();
		return dRSum;
	}
	// 捕捉异常
	catch(_com_error e)
	{
		// 显示错误信息
		AfxMessageBox(e.Description());
	}
	return dRSum;
}