MFC 中ADO方式操作ACCESS數據庫

1  基本實現流程：

     （1）初始化COM庫，引入ADO庫定義文件

　　（2）用Connection對象連接數據庫

　　（3）利用建立好的連接，通過Connection、Command對象執行SQL命令，或利用Recordset對象取得結果記錄集進行查詢、處理。

　　（4）使用完畢後關閉連接釋放對象。

 

 

2  部分代碼參考

  CAdoData::CAdoData() { if(!AfxOleInit()) { AfxMessageBox("AfxOleInit error "); } HRESULT res = m_pCon.CreateInstance(__uuidof(Connection)); } CAdoData::~CAdoData() { } int CAdoData::LoginCheck() //登陸檢查 { if(!m_pCon->State) { AfxMessageBox("未連接"); return -2; } _bstr_t sql = "select * from UserTable"; try { //_variant_t VARIANT var; var.vt = VT_I4; _RecordsetPtr pSet; pSet = m_pCon->Execute(sql,&var,adCmdText); _variant_t val; while(!pSet->adoEOF) { val = pSet->GetCollect("id"); //if(val.vt == VT_I4) long id = (long)val; val = pSet->GetCollect((long)1); CString name = (char*)(_bstr_t)val; val = pSet->GetCollect((long)1); CString pwd = (char*)(_bstr_t)val; if(strcmp(name,infomation.username)==0 && strcmp(pwd,infomation.password)==0) { return -1; } pSet->MoveNext(); } } catch (_com_error &e) { AfxMessageBox(e.Description()); } return 1; } void CAdoData::OnConnect() //連接 { if (m_pCon->State) { AfxMessageBox("已連接數據庫"); return ; } try{ _bstr_t szCon = "Provider = Microsoft.Jet.OLEDB.4.0;Data Source = server.mdb"; HRESULT res = m_pCon->Open(szCon, "","",adModeUnknown); } catch(_com_error err) { CString errormessage; errormessage.Format("連接數據庫失敗，失敗信息：%s", err.ErrorMessage()); AfxMessageBox(err.ErrorMessage()); } } void CAdoData::OnInsert() //插入數據庫 { if(!m_pCon->State) { AfxMessageBox("未連接"); return; } char username[20]={0}; char password[20]={0}; char sex[4]={0}; char birth[15]={0}; CString str; //str.Format("%s",birth) strcpy(username, infomation.username); strcpy(password, infomation.password); strcpy(sex, infomation.sex); strcpy(birth, infomation.birth); CString sql; sql.Format("insert into UserTable(用戶名,密碼,性別,生日)values('%s','%s', '%s', '%s')", username,password,sex,birth); try { VARIANT var; var.vt = VT_I4; m_pCon->Execute((_bstr_t)sql,&var,adCmdText); } catch (_com_error &e) { AfxMessageBox(e.Description()); } } void CAdoData::OnClose() //關閉數據庫 { if(m_pCon->State) { m_pCon->Close(); } } void CAdoData::OnSerchRank() //查詢積分 { if(!m_pCon->State) { AfxMessageBox("未連接"); return; } _bstr_t sql = "select * from RankTable"; try { //_variant_t VARIANT var; var.vt = VT_I4; _RecordsetPtr pSet; pSet = m_pCon->Execute(sql,&var,adCmdText); _variant_t val; while(!pSet->adoEOF) { val = pSet->GetCollect("id"); //if(val.vt == VT_I4) long id = (long)val; val = pSet->GetCollect((long)1); CString name = (char*)(_bstr_t)val; val = pSet->GetCollect((long)1); long score = (long)val; pSet->MoveNext(); } } catch (_com_error &e) { AfxMessageBox(e.Description()); } }

 有不足的地方歡迎指出！