MFC+Access2003学生成绩管理系统

用于课程设计没有问题，代码逻辑清楚，可运行，MFC+Access2003

// Ado.cpp: implementation of the CAdo class.
//
//////////////////////////////////////////////////////////////////////

#include “stdafx.h“
#include “Ado.h“

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

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

CAdo::CAdo（）
{

}

CAdo::~CAdo（）
{

}

void CAdo::OnInitADOConn（）
{
	OnInitADOConnAccess（）;
//	OnInitADOConnOrcal（）;
//	OnInitADOConnSQLServer（）;
}

_RecordsetPtr& CAdo::GetRecordSet（_bstr_t bstrSQL）
{
  try
	{
		if（m_pConnection==NULL）
              OnInitADOConn（）;
		m_pRecordset.CreateInstance（__uuidof（Recordset））;
		//adStateClosed   !=   m_recordset->GetState（）
		if（  m_pRecordset->State ==adStateOpen）
		{
			 AfxMessageBox（“记录集打开“）;
            m_pRecordset->Close（）;
			//m_pRecordset=NULL;
		}
        m_pRecordset->Open（bstrSQLm_pConnection.GetInterfacePtr（）adOpenStaticadLockOptimisticadCmdText）;
		//m_pRecordset->Open（bstrSQLm_pConnection.GetInterfacePtr（）adOpenDynamicadLockOptimisticadCmdText）;

		 variant_t m_dirno;

	}
    catch（_com_error e）
	{
		AfxMessageBox（e.Description（））;
	}
	
	
	return m_pRecordset;
	
}

BOOL CAdo::ExecuteSQL（_bstr_t bstrSQL）
{
	_variant_t RecordsAffected;
	try
	{
        if（m_pConnection==NULL）
	     	OnInitADOConn（）;
        m_pConnection->Execute（bstrSQLNULLadCmdText）;
		return true;
	}
	catch（_com_error e）
	{
		AfxMessageBox（e.Description（））;
		return false;
	}
}

void CAdo::ExitConnect（）
{
 try{
		if（m_pRecordset!=NULL）
		{
			if（ m_pRecordset->State!=NULL）
			{
				m_pRecordset->Close（）;
				m_pRecordset=NULL;
			}
		}
		if（ m_pConnection->State ==adStateOpen）
		{
			m_pConnection->Close（）;
			m_pConnection=NULL;
		}
		::CoUninitialize（）;
	}
	catch（_com_error e）
	{
		AfxMessageBox（e.Description（））;
	}
}

void CAdo::OnInitADOConn（CString filename）
{
	::CoInitialize（NULL）;
	try
	{
       m_pConnection.CreateInstance（“ADODB.Connection“）;
	   char pBuf[MAX_PATH]; //存放路径的变量
       CString appathstrConnect;
       GetModuleFileName（NULL pBuf MAX_PATH）;//此方获取的很准确
       （_tcsrchr（pBuf _T（‘\\‘）））[1] = 0; //删除文件名，只获得路径
	   
       appath=pBuf;
	   appath.TrimRight（‘\\‘）;
	   strcpy（pBufappath）;
      （_tcsrchr（pBuf _T（‘\\‘）））[1] = 0; //删除文件名，只获得路径
	   appath=pBuf;
       appath+=“attend.mdb“;
	   appath=“./attend.mdb“;
      strConnect.Format（“Provider=Microsoft.Jet.OLEDB.4.0;Data Source=%s;Jet OLEDB:Database Password=ahut@123;Persist Security Info=False;Mode=Share Deny None“appath）;
      m_pConnection->Open（（_bstr_t）strConnect““““adModeUnknown）;
	  
	   
	}
	catch（_com_error e）
	{
		AfxMessageBox（“OnInitADOConn（）“）;
		AfxMessageBox（e.Description（））;
	}
	/*AfxOleInit（）;
	m_pConnection.CreateInstance（__uuidof（Connection））;

	try                

 属性            大小     日期    时间   名称
----------- ---------  ---------- -----  ----

     文件       7568  2012-12-08 20:00  StuGL - MFC\Ado.cpp

     文件       1383  2011-12-22 16:28  StuGL - MFC\Ado.h

     文件       5269  2012-12-08 19:57  StuGL - MFC\BasicInfoDlg.cpp

     文件       1423  2012-12-03 19:40  StuGL - MFC\BasicInfoDlg.h

     文件     397312  2012-12-09 10:54  StuGL - MFC\DB_StuGL.mdb

     文件       6248  2012-12-11 18:45  StuGL - MFC\GradeDlg.cpp

     文件       1508  2012-12-11 18:43  StuGL - MFC\GradeDlg.h

     文件       2858  2012-12-16 09:50  StuGL - MFC\LoadDataDlg.cpp

     文件       1330  2012-12-03 15:57  StuGL - MFC\LoadDataDlg.h

     文件       1626  2012-12-03 20:10  StuGL - MFC\MainDlg.cpp

     文件       1317  2012-12-03 20:08  StuGL - MFC\MainDlg.h

     文件     221976  2012-06-06 13:05  StuGL - MFC\msado15.tlh

     文件     171591  2012-06-06 13:05  StuGL - MFC\msado15.tli

     文件       3561  2012-12-02 19:51  StuGL - MFC\ReadMe.txt

     文件       2243  2012-12-08 22:57  StuGL - MFC\resource.h

     文件        207  2012-12-02 19:51  StuGL - MFC\StdAfx.cpp

     文件       1054  2012-12-02 19:51  StuGL - MFC\StdAfx.h

     文件      25680  2015-03-16 22:56  StuGL - MFC\StuGL.aps

     文件       3955  2004-01-01 09:56  StuGL - MFC\StuGL.clw

     文件       2049  2012-12-02 19:51  StuGL - MFC\StuGL.cpp

     文件       4780  2012-12-03 19:21  StuGL - MFC\StuGL.dsp

     文件        518  2012-12-02 19:51  StuGL - MFC\StuGL.dsw

     文件       1313  2012-12-02 19:51  StuGL - MFC\StuGL.h

     文件      56832  2004-01-01 09:56  StuGL - MFC\StuGL.opt

     文件        244  2012-12-16 10:56  StuGL - MFC\StuGL.plg

     文件       9910  2012-12-08 22:57  StuGL - MFC\StuGL.rc

     文件       5042  2012-12-11 18:41  StuGL - MFC\StuGLDlg.cpp

     文件       1418  2012-12-11 18:40  StuGL - MFC\StuGLDlg.h

     文件     124703  2012-12-08 20:00  StuGL - MFC\Debug\Ado.obj

     文件      42477  2012-12-08 19:57  StuGL - MFC\Debug\BasicInfoDlg.obj

............此处省略25个文件信息