使用VC連接Access數據庫的兩種方法
BOOL ODBCConnect(CString strDBFile) { CString strConnect; strConnect.Format(_T("ODBC;DRIVER={MICROSOFT ACCESS DRIVER (*.mdb)};UID=sa;PWD=;DBQ=%s"), strDBFile); CDatabase db; if(db.Open(NULL, FALSE, FALSE, strConnect)) { //連接數據庫成功 CRecordset rs(&db); CString strSql; strSql = _T("select * from info"); //SQL語句 rs.Open(AFX_DB_USE_DEFAULT_TYPE, strSql); //執行Sql語句(可添加 刪除 查詢等) if(rs.IsOpen()) { CDBVariant variant; rs.MoveFirst(); while(!rs.IsEOF()) { //讀取記錄 rs.GetFieldValue(_T("姓名"), variant); rs.MoveNext(); } } db.Close(); return TRUE; } return FALSE; } |
#import "C:Program Files/Common Files/System/ado/msado15.dll" rename("EOF", "adoEOF") //生成C++類,改變EOF函數的名稱 using namespace ADODB; BOOL ADOConnect(CString strDBFile) { _ConnectionPtr pConnection; if(pConnection.CreateInstance(__uuidof(Connection)) != S_OK) { return FALSE; } CString strConnect; strConnect.Format(_T("Provider=Microsoft.Jet.OLEDB.4.0;Data Source=%s"), strDBFile); if(pConnection->Open(_bstr_t(strConnect), "", "", adModeUnknown) == S_OK) { //連接數據庫成功 _RecordsetPtr pRecordset; if(pRecordset.CreateInstance(__uuidof(Recordset)) != S_OK) { pConnection->Close(); return FALSE; } CString strSql; strSql = _T("select * from info"); HRESULT hr = pRecordset->Open(_bstr_t(strSql), _variant_t((IDispatch*)pConnection, TRUE), adOpenUnspecified, adLockUnspecified, adCmdUnknown); if(hr != S_OK) { pConnection->Close(); return FALSE; } _variant_t vt; pRecordset->MoveFirst(); while(!pRecordset->adoEOF) { vt = pRecordset->Fields->GetItem("姓名")->Value; pRecordset->MoveNext(); } pConnection->Close(); return TRUE; } return FALSE; } |
posted @ 2014-08-27 10:41 順其自然EVO 閱讀(167) | 評論 (0) | 編輯 收藏