rainstsaccess.cpp

用C++基于SQL SERVER使用存储过程

// RainStsAccess.cpp: implementation of the RainStsAccess class.
//
//////////////////////////////////////////////////////////////////////

#include "stdafx.h"
//#include "afx.h"
#include "RainStsAccess.h"

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

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

RainStsAccess::RainStsAccess()
{

}

RainStsAccess::~RainStsAccess()
{

}
/*
int RainStsAccess::startbr()
{
	int intReturnCode=0;

	if(!m_fConnected){
		m_strErrMsg="***错误：数据库尚未连接";
		return -1;
	}

	HRESULT			hr;
	_bstr_t			source=m_strSource;
	_bstr_t			query=m_strSQL;
	try{
		hr=m_pRst->Open(query,source,adOpenDynamic,adLockOptimistic,adCmdText);
	}
	catch(_com_error e){
		m_strErrMsg.Format("***错误：打开记录集出错:%s",e.ErrorMessage());
		return -1;
	}

	intReturnCode=bindvalue();
	if(intReturnCode<0)m_strErrMsg="***错误：获取表栏位值出错";
	return intReturnCode;
}

int RainStsAccess::readnext()
{
	int intReturnCode=0;

	if(!m_fConnected){
		m_strErrMsg="***错误：数据库尚未连接";
		return -1;
	}

	try{
		m_pRst->MoveNext();
	}
	catch(_com_error e){
		m_strErrMsg.Format("***错误：记录集读取次笔出错:%s",e.ErrorMessage());
		return -1;
	}

	intReturnCode=bindvalue();
	if(intReturnCode<0)m_strErrMsg="***错误：获取表栏位值出错";
	return intReturnCode;
}

int RainStsAccess::endbr()
{
	if(!m_fConnected)return -1;
	m_pRst->Close();
	return 0;
}

int RainStsAccess::insertrec()
{
	int intReturnCode=0;
	
	if(!m_fConnected){
		m_strErrMsg="***错误：数据库尚未连接";
		return -1;
	}

	HRESULT			hr;

	try{
		hr=m_pRst->AddNew();
		intReturnCode=setvalue();
		if(intReturnCode<0){
			m_strErrMsg="***错误：设置表栏位值出错";
			return intReturnCode;
		}

		hr=m_pRst->Update();
	}
	catch(_com_error e){
		m_strErrMsg.Format("***错误：新增记录出错:%s",e.ErrorMessage());
		return -1;
	}

	return 0;
}

int RainStsAccess::updaterec()
{
	int intReturnCode=0;

	HRESULT			hr;

	if(!m_fConnected){
		m_strErrMsg="***错误：数据库尚未连接";
		return -1;
	}

	if(m_pRst->EndOfFile){
		m_strErrMsg="   警告：记录集到尾";
		return 1;
	}

	try{
		intReturnCode=setvalue();
		if(intReturnCode<0){
			m_strErrMsg="***错误：设置表栏位值出错";
			return intReturnCode;
		}
		hr=m_pRst->Update();
	}
	catch(_com_error e){
		m_strErrMsg.Format("***错误：更新数据出错%s",e.ErrorMessage());
		return -1;
	}

	return 0;
}

int RainStsAccess::deleterec()
{
	int intReturnCode=0;

	HRESULT			hr;

	if(!m_fConnected){
		m_strErrMsg="***错误：数据库尚未连接";
		return -1;
	}

	if(m_pRst->EndOfFile){
		m_strErrMsg="   警告：记录集到尾";
		return 1;
	}

	try{
		hr=m_pRst->Delete(adAffectCurrent);
	}
	catch(_com_error e){
		m_strErrMsg.Format("***错误：删除数据出错:%s",e.ErrorMessage());
		return -1;
	}

	return 0;
}
*/
int RainStsAccess::addiupdaterec()
{
	HRESULT			hr;
	VARIANT			varValue;
	
	if(!m_fConnected){
		m_strErrMsg="***错误：数据库尚未连接";
		return -1;
	}

	if(m_pRst->EndOfFile){
		m_strErrMsg="   警告：记录集到尾";
		return 1;
	}

	try{
		m_strStepName="addiupdaterec";
		varValue.vt=VT_BSTR;
		varValue.bstrVal=(_bstr_t)m_strLastAddiTime;
		m_pRst->PutCollect("LastAddiTime",&varValue);

		varValue.vt=VT_R8;
		varValue.dblVal=m_dblLastAddiInfo;
		m_pRst->PutCollect("LastAddiInfo",&varValue);

		hr=m_pRst->Update();
	}
	catch(_com_error e){
		m_strErrMsg.Format("***错误：更新部分数据出错(%s):%s",m_strStepName,PrintError());
		return -1;
	}

	return 0;
}

int RainStsAccess::setvalue()
{
	VARIANT			varValue;
	CString			strValue;

	try{
		varValue.vt=VT_BSTR;
		varValue.bstrVal=(_bstr_t)m_strStation;
		m_pRst->PutCollect("Station",&varValue);

		varValue.vt=VT_BSTR;
		varValue.bstrVal=(_bstr_t)m_strLastRainTime;
		m_pRst->PutCollect("LastRainTime",&varValue);

		varValue.vt=VT_R8;
		varValue.dblVal=m_dblLastRainInfo;
		m_pRst->PutCollect("LastRainInfo",&varValue);

		varValue.vt=VT_R8;
		varValue.dblVal=m_dblRainPeriodSts;
		m_pRst->PutCollect("RainPeriodSts",&varValue);

		varValue.vt=VT_R8;
		varValue.dblVal=m_dblRainDaySts;
		m_pRst->PutCollect("RainDaySts",&varValue);

		varValue.vt=VT_R8;
		varValue.dblVal=m_dblRainTenDaySts;
		m_pRst->PutCollect("RainTenDaySts",&varValue);

		varValue.vt=VT_R8;
		varValue.dblVal=m_dblRainMonthSts;
		m_pRst->PutCollect("RainMonthSts",&varValue);

		varValue.vt=VT_BSTR;
		varValue.bstrVal=(_bstr_t)m_strLastAddiTime;
		m_pRst->PutCollect("LastAddiTime",&varValue);

		varValue.vt=VT_R8;
		varValue.dblVal=m_dblLastAddiInfo;
		m_pRst->PutCollect("LastAddiInfo",&varValue);

	}
	catch(_com_error e){
		return -1;
	}
	return 0;
}

int RainStsAccess::bindvalue()
{
	if(m_pRst->EndOfFile)return 1;

	VARIANT			varValue;
	CString			strValue;
	try{
		varValue = m_pRst->GetCollect("Station");
		if(varValue.vt != VT_NULL)m_strStation=(LPCSTR)_bstr_t(varValue);

		varValue = m_pRst->GetCollect("LastRainTime");
		if(varValue.vt != VT_NULL)m_strLastRainTime=(LPCSTR)_bstr_t(varValue);

		varValue = m_pRst->GetCollect("LastRainInfo");
		if(varValue.vt != VT_NULL)m_dblLastRainInfo=varValue.dblVal;

		varValue = m_pRst->GetCollect("RainPeriodSts");
		if(varValue.vt != VT_NULL)m_dblRainPeriodSts=varValue.dblVal;

		varValue = m_pRst->GetCollect("RainDaySts");
		if(varValue.vt != VT_NULL)m_dblRainDaySts=varValue.dblVal;

		varValue = m_pRst->GetCollect("RainTenDaySts");
		if(varValue.vt != VT_NULL)m_dblRainTenDaySts=varValue.dblVal;

		varValue = m_pRst->GetCollect("RainMonthSts");
		if(varValue.vt != VT_NULL)m_dblRainMonthSts=varValue.dblVal;

		varValue = m_pRst->GetCollect("LastAddiTime");
		if(varValue.vt != VT_NULL)m_strLastAddiTime=(LPCSTR)_bstr_t(varValue);

		varValue = m_pRst->GetCollect("LastAddiInfo");
		if(varValue.vt != VT_NULL)m_dblLastAddiInfo=varValue.dblVal;
	}
	catch(_com_error e){
		return -1;
	}

	return 0;
}