VC + + 6.0 액세스 데이터베이스 연결

#import "C:\Program Files\Common Files\System\ado\msado15.dll" no_namespace  rename("EOF","adoEOF")rename("BOF","adoBOF") 



class ADOConnN

{

public:

	_ConnectionPtr m_pConnect;

	_CommandPtr m_pCommand;

	_RecordsetPtr m_pRecord;



	void OnInitADOConn();//        

	void ExitConnect();//       

	void ExecuteSQL(CString sqlstr);//          、  、   

	_RecordsetPtr GetRecord(CString sqlstr);//             

};

#include "ADOConn.h"

#include "stdafx.h"



void ADOConnN::OnInitADOConn()

{

	::CoInitialize(NULL);

	try  

	{   //           

		m_pConnect.CreateInstance("ADODB.Connection");   

		//          

		CString strConnect="DRIVER={Microsoft Access Driver (*.mdb)};uid=;pwd=;DBQ=localwork.mdb;";   //      localwork.mdb

		//  Open          

		m_pConnect->Open((_bstr_t)strConnect,"","",adModeUnknown); 

	}  

	catch(_com_error e)  

	{   

		AfxMessageBox("      ，            ！");  

	}

}



void ADOConnN::ExitConnect()

{

	if(m_pRecord!=NULL)

		m_pRecord->Close();

	m_pConnect->Close();

	::CoUninitialize();

}



void ADOConnN::ExecuteSQL(CString sqlstr)

{

	m_pConnect->Execute((_bstr_t)sqlstr,NULL,adCmdText);

}



_RecordsetPtr ADOConnN::GetRecord(CString sqlstr)

{

	_RecordsetPtr m_precordset=m_pConnect->Execute((_bstr_t)sqlstr,NULL,adCmdText);

	return m_precordset;

}

	CString bstrSQL ="select * from tb_UserInfo";//tb_UserInfo localwork.mdb     

	ADOConnN con;//          

	con.OnInitADOConn();//                 

	con.m_pRecord=con.GetRecord(bstrSQL);//     

	while(!con.m_pRecord->adoEOF)

	{

	　　m_Grid.InsertItem(0,"");

	　　m_Grid.SetItemText(0,0,(char*)(_bstr_t)con.m_pRecord->GetCollect("Username"));//Username tb_UserInfo    

	　　m_Grid.SetItemText(0,1,(char*)(_bstr_t)con.m_pRecord->GetCollect("password"));//password tb_UserInfo    

	　　//              

	　　con.m_pRecord->MoveNext();

	}

	con.ExitConnect();//