example_3doc.cpp

基于mfc的ODBC数据库连接编程,并包含图形的报表的生成以及动态表格报表的建模

// Example_3Doc.cpp : implementation of the CExample_3Doc class
//

#include "stdafx.h"
#include "Example_3.h"

#include "Example_3Doc.h"
#include "ExaDg_3.h"
#ifdef _DEBUG
#define new DEBUG_NEW
#undef THIS_FILE
static char THIS_FILE[] = __FILE__;
#endif

/////////////////////////////////////////////////////////////////////////////
// CExample_3Doc

IMPLEMENT_DYNCREATE(CExample_3Doc, CDocument)

BEGIN_MESSAGE_MAP(CExample_3Doc, CDocument)
	//{{AFX_MSG_MAP(CExample_3Doc)
	ON_COMMAND(ID_DATE_E3, OnDateE3)
	//}}AFX_MSG_MAP
END_MESSAGE_MAP()

/////////////////////////////////////////////////////////////////////////////
// CExample_3Doc construction/destruction

CExample_3Doc::CExample_3Doc()
{
	// TODO: add one-time construction code here

}

CExample_3Doc::~CExample_3Doc()
{
}

BOOL CExample_3Doc::OnNewDocument()
{
	if (!CDocument::OnNewDocument())
		return FALSE;
	// TODO: add reinitialization code here
	// (SDI documents will reuse this document)
	m_strCnt=_T("Provider=SQLOLEDB;"
		"Data Source=OFFICE-WXF;"
		"Uid=sa;"
		"Password=16676175;"
		"database=Exa_3");
	m_strCTt=_T("Select * from Exat_3");
	
	m_pRs=NULL;
	m_piAdoRecordBinding=NULL;
	
	::CoInitialize(NULL);
//	m_pConnectiong->Open(m_strCnt,"","",adConnectUnspecified);
	try 
	{
		m_pRs.CreateInstance(__uuidof(Recordset));
		
		m_pRs->Open((LPCTSTR)m_strCTt,(LPCTSTR)m_strCnt,adOpenDynamic,adLockOptimistic,
			adCmdUnknown);

		if(FAILED(m_pRs->QueryInterface(__uuidof(IADORecordBinding),
			(LPVOID*)&m_piAdoRecordBinding)))
			_com_issue_error(E_NOINTERFACE);
		m_piAdoRecordBinding->BindToRecordset(&m_rsRecSet);

	}
	catch (_com_error &e)
	{
		GError(e.Error(),e.Description());
	}
	return TRUE;
}



/////////////////////////////////////////////////////////////////////////////
// CExample_3Doc serialization

void CExample_3Doc::Serialize(CArchive& ar)
{
	if (ar.IsStoring())
	{
		// TODO: add storing code here
	}
	else
	{
		// TODO: add loading code here
	}
}

/////////////////////////////////////////////////////////////////////////////
// CExample_3Doc diagnostics

#ifdef _DEBUG
void CExample_3Doc::AssertValid() const
{
	CDocument::AssertValid();
}

void CExample_3Doc::Dump(CDumpContext& dc) const
{
	CDocument::Dump(dc);
}
#endif //_DEBUG

/////////////////////////////////////////////////////////////////////////////
// CExample_3Doc commands

ExaCI_3* CExample_3Doc::GetRecSet()
{
	return &m_rsRecSet;
}

void CExample_3Doc::GError(HRESULT hr, PWSTR pwszDescription)
{
	CString strError;
	strError.Format("Run-time error'%(&x)'",hr,hr);
	strError+="\n\n";
	strError+=pwszDescription;
	AfxMessageBox(strError);
}

void CExample_3Doc::DeleteContents() 
{
    if(m_pRs)
		m_pRs->Close();
	if(m_piAdoRecordBinding)
		m_pRs=NULL;
	CoUninitialize();
	CDocument::DeleteContents();
}

void CExample_3Doc::OnDateE3() 
{
	// TODO: Add your command handler code here
	ExaDg_3 m_Dg(this);

	m_pRs->MoveFirst();
	
	m_Dg.m_fy=GetRecSet()->m_Cfy;
	m_Dg.m_f1=GetRecSet()->m_Cf1;
	m_Dg.m_f2=GetRecSet()->m_Cf2;
	m_Dg.m_f3=GetRecSet()->m_Cf3;
	m_Dg.m_f4=GetRecSet()->m_Cf4;
	m_Dg.m_f5=GetRecSet()->m_Cf5;
	m_Dg.m_f6=GetRecSet()->m_Cf6;
	m_Dg.m_f7=GetRecSet()->m_Cf7;

	m_Dg.DoModal();
}

void CExample_3Doc::MoveFirst()
{
try
	{
	
		m_piAdoRecordBinding->Update(&m_rsRecSet);
		m_pRs->MoveFirst();
	}
catch (_com_error &e)
	{
		GError(e.Error(),e.Description());
	}
}

void CExample_3Doc::MoveNext()
{
try
	{
	
		m_piAdoRecordBinding->Update(&m_rsRecSet);
		m_pRs->MoveNext();
	}
catch (_com_error &e)
	{
		GError(e.Error(),e.Description());
	}
}

void CExample_3Doc::MovePrev()
{
try
	{
	
		m_piAdoRecordBinding->Update(&m_rsRecSet);
		m_pRs->MovePrevious();
	}
catch (_com_error &e)
	{
		GError(e.Error(),e.Description());
	}
}

void CExample_3Doc::MoveLast()
{
try
	{
	
		m_piAdoRecordBinding->Update(&m_rsRecSet);
		m_pRs->MoveLast();
	}
catch (_com_error &e)
	{
		GError(e.Error(),e.Description());
	}
}

void CExample_3Doc::AddNew()
{
try
	{
		m_piAdoRecordBinding->Update(&m_rsRecSet);
		
		if(m_pRs->Supports(adAddNew))
		{
			CreateBlankRecord();
			
			m_piAdoRecordBinding->AddNew(&m_rsRecSet);
			m_pRs->MoveLast();

		}
	}
catch (_com_error &e)
	{
		GError(e.Error(),e.Description());
	}
}

void CExample_3Doc::CreateBlankRecord()
{
	m_rsRecSet.m_Cfy=0;
	m_rsRecSet.m_Cf1=0;
	m_rsRecSet.m_Cf2=0;
	m_rsRecSet.m_Cf3=0;
	m_rsRecSet.m_Cf4=0;
	m_rsRecSet.m_Cf5=0;
	m_rsRecSet.m_Cf6=0;
	m_rsRecSet.m_Cf7=0;
}

void CExample_3Doc::Delete()
{
try
	{
	
		m_piAdoRecordBinding->Update(&m_rsRecSet);
		if(m_pRs->Supports(adDelete))
		{
			if(AfxMessageBox("你确实想删除这个记录么？",MB_YESNO|MB_ICONQUESTION)==IDYES)
		
			{
			m_pRs->Delete(adAffectCurrent);
			m_pRs->MovePrevious();
			}

		}
	}
catch (_com_error &e)
	{
		GError(e.Error(),e.Description());
	}
}