adorwaccess.cpp

简单的vc实现与Access的ado连接

///////////////////////////
#include "stdafx.h"
#include "AdoRWAccess.h"
#include "AdoRWAccessDlg.h"

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

/////////////////////////////////////////////////////////////////////////////
// CAdoRWAccessApp

BEGIN_MESSAGE_MAP(CAdoRWAccessApp, CWinApp)
	//{{AFX_MSG_MAP(CAdoRWAccessApp)
		// NOTE - the ClassWizard will add and remove mapping macros here.
		//    DO NOT EDIT what you see in these blocks of generated code!
	//}}AFX_MSG
	ON_COMMAND(ID_HELP, CWinApp::OnHelp)
END_MESSAGE_MAP()

/////////////////////////////////////////////////////////////////////////////
// CAdoRWAccessApp construction

CAdoRWAccessApp::CAdoRWAccessApp()
{
	// TODO: add construction code here,
	// Place all significant initialization in InitInstance
}

/////////////////////////////////////////////////////////////////////////////
// The one and only CAdoRWAccessApp object

CAdoRWAccessApp theApp;


/////////////////////////////////////////////////////////////////////////////
BOOL CAdoRWAccessApp::InitInstance()
{
	AfxEnableControlContainer();

	// Standard initialization
	// If you are not using these features and wish to reduce the size
	//  of your final executable, you should remove from the following
	//  the specific initialization routines you do not need.

#ifdef _AFXDLL
	Enable3dControls();			// Call this when using MFC in a shared DLL
#else
	Enable3dControlsStatic();	// Call this when linking to MFC statically
#endif

/*	
    HANDLE m_hMutex=CreateMutex(NULL,TRUE, m_pszAppName); 
    if(GetLastError()==ERROR_ALREADY_EXISTS) { return FALSE; }

	
	SetDialogBkColor(RGB(160,180,220),RGB(0,0,0));

*/	// ------------------------------------------------------------------------------------------------

	AfxOleInit();
	m_pConnection.CreateInstance(__uuidof(Connection));

	try                 
	{	
		// 打开
		m_pConnection->Open("Provider=Microsoft.Jet.OLEDB.4.0;Data Source=MyAccess.mdb","","",adModeUnknown);
		
	}
	catch(_com_error e)
	{
		AfxMessageBox("数据库连接失败，确认数据库MyAccess.mdb是否在当前路径下!");
		return FALSE;
	} 
	// ---------------------------------------------------------------------------------------------------

	CAdoRWAccessDlg dlg;
	m_pMainWnd = &dlg;
	int nResponse = dlg.DoModal();
	if (nResponse == IDOK)
	{
		// TODO: Place code here to handle when the dialog is
		//  dismissed with OK
	}
	else if (nResponse == IDCANCEL)
	{
		// TODO: Place code here to handle when the dialog is
		//  dismissed with Cancel
	}

	// Since the dialog has been closed, return FALSE so that we exit the
	//  application, rather than start the application's message pump.
	return FALSE;
}



/////////////////////////////////////////////////////////////////////////////
int CAdoRWAccessApp::ExitInstance() 
{
	// 关闭ADO连接状态
	if(m_pConnection->State)
		m_pConnection->Close();
	m_pConnection= NULL;

	return CWinApp::ExitInstance();
}