#import"C:\Program Files\Common Files\System\ado\msado15.dll" no_namespace rename("EOF","end")2.在CTestApp文件的InitInstance()函数中domodal之前写::CoInitialize(NULL);程序结束时CoUninitialize();
3.CTestDlg.h中添加:
_ConnectionPtr connection; _RecordsetPtr record;
初始化工作在cpp文件的BOOL CTestDlg::OnInitDialog()函数中完成:
try{ } catch(_com_error e){ e.Description() }
connection.CreateInstance("ADODB.Connection"); bstr_t strConnect = "Provider=Microsoft.ACE.OLEDB.12.0;Data Source=d:\\StudyPoems.accdb;Persist Security Info=False"; connection->Open(strConnect,"","",adModeUnknown);
执行OnCancle()时释放连接:connection->Close();
4.查询记录
CString sql = "select * from studentstable"; record.CreateInstance(__uuidof(Recordset)); record->Open(_bstr_t(sql),connection.GetInterfacePtr(),adOpenDynamic,adLockOptimistic,adCmdText); CString num,pass,progress; while(!record->end) { num = (char *)(_bstr_t)record->GetCollect("num"); pass = (char *)(_bstr_t)record->GetCollect("password"); progress = (char *)(_bstr_t)record->GetCollect("progress"); m_list.InsertItem(0,num,0); m_list.SetItemText(0,1,pass); m_list.SetItemText(0,2,progress); record->MoveNext(); } //关闭记录集 record->Close();
5.修改记录
CString sql = "update studentstable set [password] = '201234' where num = '100003'"; connection->Execute((_bstr_t)sql,NULL,adCmdText);6.增加记录
CString cmdstr = "select * from studentstable"; //利用ado对象添加记录 record.CreateInstance(_uuidof(Recordset)); record->Open(_bstr_t(cmdstr),connection.GetInterfacePtr(),adOpenDynamic,adLockOptimistic,adCmdText); record->AddNew(); CString num = "100003"; CString pass = "300001"; CString progress = "1"; record->PutCollect("num",(_bstr_t)num); record->PutCollect("password",(_bstr_t)pass); record->PutCollect("progress",(_bstr_t)progress); record->Update(); record->Close();
7.删除记录
CString sql = "delete from studentstable where num = '100003'"; connection->Execute((bstr_t)sql,NULL,adCmdText);