adodlg.cpp

Visual_C++.NET实用编程百例

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

#include "stdafx.h"
#include "ADO.h"
#include "ADODlg.h"
#include ".\adodlg.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()


// CADODlg 对话框



CADODlg::CADODlg(CWnd* pParent /*=NULL*/)
	: CDialog(CADODlg::IDD, pParent)
	, m_No(_T(""))
	, m_Name(_T(""))
	, m_Literary(_T(""))
	, m_Math(_T(""))
	, m_Total(_T(""))
{
	m_hIcon = AfxGetApp()->LoadIcon(IDR_MAINFRAME);
}

void CADODlg::DoDataExchange(CDataExchange* pDX)
{
	CDialog::DoDataExchange(pDX);
	DDX_Text(pDX, IDC_EDIT1, m_No);
	DDX_Text(pDX, IDC_EDIT2, m_Name);
	DDX_Text(pDX, IDC_EDIT3, m_Literary);
	DDX_Text(pDX, IDC_EDIT4, m_Math);
	DDX_Text(pDX, IDC_EDIT5, m_Total);
}

BEGIN_MESSAGE_MAP(CADODlg, CDialog)
	ON_WM_SYSCOMMAND()
	ON_WM_PAINT()
	ON_WM_QUERYDRAGICON()
	//}}AFX_MSG_MAP
	ON_BN_CLICKED(IDC_BUTTON1, OnBnClickedButton1)
	ON_BN_CLICKED(IDC_BUTTON2, OnBnClickedButton2)
	ON_BN_CLICKED(IDC_BUTTON3, OnBnClickedButton3)
	ON_BN_CLICKED(IDC_BUTTON4, OnBnClickedButton4)
	ON_BN_CLICKED(IDOK, OnBnClickedOk)
END_MESSAGE_MAP()


// CADODlg 消息处理程序

BOOL CADODlg::OnInitDialog()
{
	CDialog::OnInitDialog();
	CString strConn="Provider=Microsoft.Jet.OLEDB.4.0;Data Source=\ Testdb.mdb";
	bstr_t bstrConn=strConn.AllocSysString ();
	m_pConnection.CreateInstance (_uuidof(Connection));
	m_pConnection->Open (bstrConn,"","",-1);
	m_pRecordset.CreateInstance (_uuidof(Recordset));
	m_pRecordset->Open ("Select * from grade",m_pConnection.GetInterfacePtr (),adOpenDynamic,adLockOptimistic,adCmdText);
	_variant_t varNo,varName,varLiterary,varMath,varTotal;
	TRY
	{
        m_pRecordset->MoveFirst();
		varNo=m_pRecordset->GetCollect ("NO");		
        varName=m_pRecordset->GetCollect("Name");
        varLiterary=m_pRecordset->GetCollect("Literary");
        varMath=m_pRecordset->GetCollect("Math");
        varTotal=m_pRecordset->GetCollect("Total");
		if(varNo.vt!=VT_NULL)
			m_No=(char*)_bstr_t(varNo);
		if(varName.vt!=VT_NULL)
			m_Name=(char*)_bstr_t(varName);
		if(varLiterary.vt!=VT_NULL)
			m_Literary=(char*)_bstr_t(varLiterary);
		if(varMath.vt!=VT_NULL)
			m_Math=(char*)_bstr_t(varMath);
		if(varTotal.vt!=VT_NULL)
			m_Total=(char*)_bstr_t(varTotal);
	}
	CATCH_ALL(e)
		AfxMessageBox("初始化失败");
	END_CATCH_ALL
	UpdateData(FALSE);
	// 将\“关于...\”菜单项添加到系统菜单中。

	// 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: 在此添加额外的初始化代码
	
	return TRUE;  // 除非设置了控件的焦点，否则返回 TRUE
}

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

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

void CADODlg::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 CADODlg::OnQueryDragIcon()
{
	return static_cast<HCURSOR>(m_hIcon);
}

void CADODlg::OnBnClickedButton1()
{
	_variant_t varNo,varName,varLiterary,varMath,varTotal;
	TRY
	{
		m_pRecordset->MoveFirst();
		varNo=m_pRecordset->GetCollect ("NO");		
		varName=m_pRecordset->GetCollect("Name");
		varLiterary=m_pRecordset->GetCollect("Literary");
		varMath=m_pRecordset->GetCollect("Math");
		varTotal=m_pRecordset->GetCollect("Total");
		if(varNo.vt!=VT_NULL)
			m_No=(char*)_bstr_t(varNo);
		if(varName.vt!=VT_NULL)
			m_Name=(char*)_bstr_t(varName);
		if(varLiterary.vt!=VT_NULL)
			m_Literary=(char*)_bstr_t(varLiterary);
		if(varMath.vt!=VT_NULL)
			m_Math=(char*)_bstr_t(varMath);
		if(varTotal.vt!=VT_NULL)
			m_Total=(char*)_bstr_t(varTotal);
	}
	CATCH_ALL(e)
		AfxMessageBox("Error");
	END_CATCH_ALL
	UpdateData(FALSE);
}

void CADODlg::OnBnClickedButton2()
{
	if(!m_pRecordset->BOF )
	{
		_variant_t varNo,varName,varLiterary,varMath,varTotal;
		TRY
		{
			m_pRecordset->MovePrevious();
			varNo=m_pRecordset->GetCollect ("NO");		
			varName=m_pRecordset->GetCollect("Name");
			varLiterary=m_pRecordset->GetCollect("Literary");
			varMath=m_pRecordset->GetCollect("Math");
			varTotal=m_pRecordset->GetCollect("Total");
			if(varNo.vt!=VT_NULL)
				m_No=(char*)_bstr_t(varNo);
			if(varName.vt!=VT_NULL)
				m_Name=(char*)_bstr_t(varName);
			if(varLiterary.vt!=VT_NULL)
				m_Literary=(char*)_bstr_t(varLiterary);
			if(varMath.vt!=VT_NULL)
				m_Math=(char*)_bstr_t(varMath);
			if(varTotal.vt!=VT_NULL)
				m_Total=(char*)_bstr_t(varTotal);
		}
		CATCH_ALL(e)
			AfxMessageBox("Error");
		END_CATCH_ALL
		UpdateData(FALSE);
	}
}

void CADODlg::OnBnClickedButton3()
{
	if(!m_pRecordset->adoEOF )
	{
		_variant_t varNo,varName,varLiterary,varMath,varTotal;
		TRY
		{
			m_pRecordset->MoveNext();
			varNo=m_pRecordset->GetCollect ("NO");		
			varName=m_pRecordset->GetCollect("Name");
			varLiterary=m_pRecordset->GetCollect("Literary");
			varMath=m_pRecordset->GetCollect("Math");
			varTotal=m_pRecordset->GetCollect("Total");
			if(varNo.vt!=VT_NULL)
				m_No=(char*)_bstr_t(varNo);
			if(varName.vt!=VT_NULL)
				m_Name=(char*)_bstr_t(varName);
			if(varLiterary.vt!=VT_NULL)
				m_Literary=(char*)_bstr_t(varLiterary);
			if(varMath.vt!=VT_NULL)
				m_Math=(char*)_bstr_t(varMath);
			if(varTotal.vt!=VT_NULL)
				m_Total=(char*)_bstr_t(varTotal);
		}
		CATCH_ALL(e)
			AfxMessageBox("Error");
		END_CATCH_ALL
		UpdateData(FALSE);
	}	
}

void CADODlg::OnBnClickedButton4()
{	
	_variant_t varNo,varName,varLiterary,varMath,varTotal;
	TRY
	{
		m_pRecordset->MoveLast();
		varNo=m_pRecordset->GetCollect ("NO");		
		varName=m_pRecordset->GetCollect("Name");
		varLiterary=m_pRecordset->GetCollect("Literary");
		varMath=m_pRecordset->GetCollect("Math");
		varTotal=m_pRecordset->GetCollect("Total");
		if(varNo.vt!=VT_NULL)
			m_No=(char*)_bstr_t(varNo);
		if(varName.vt!=VT_NULL)
			m_Name=(char*)_bstr_t(varName);
		if(varLiterary.vt!=VT_NULL)
			m_Literary=(char*)_bstr_t(varLiterary);
		if(varMath.vt!=VT_NULL)
			m_Math=(char*)_bstr_t(varMath);
		if(varTotal.vt!=VT_NULL)
			m_Total=(char*)_bstr_t(varTotal);
	}
	CATCH_ALL(e)
		AfxMessageBox("Error");
	END_CATCH_ALL
	UpdateData(FALSE);
}

void CADODlg::OnBnClickedOk()
{
	// TODO: 在此添加控件通知处理程序代码
	CDialog::OnOK();
}