mdb數據庫的操作

void CPopManuDlg::LoadBookInfo(BOOL IsDesc)
{
	m_list.DeleteAllItems();
	CString sql;
	if (!IsDesc)
		sql = "Select * from tb_bookinfo ORDER BY PRICE ASC";
	else
		sql = "Select * from tb_bookinfo ORDER BY PRICE desc";
	CString fieldvalue;
	m_pRecord = m_pCon->Execute((_bstr_t)sql,NULL,adCmdText);
	int i = 0;
	while (! m_pRecord->ADOEOF && !m_pRecord->BOF)
	{	
		m_list.InsertItem(100,"");

		fieldvalue = (TCHAR*)(_bstr_t)m_pRecord->GetFields()->GetItem("bookname")->Value;
		m_list.SetItemText(i,0,fieldvalue);

		fieldvalue = (TCHAR*)(_bstr_t)m_pRecord->GetFields()->GetItem("barcode")->Value;
		m_list.SetItemText(i,1,fieldvalue);

		fieldvalue =(TCHAR*) (_bstr_t)m_pRecord->GetFields()->GetItem("author")->Value;
		m_list.SetItemText(i,2,fieldvalue);

		fieldvalue = (TCHAR*)(_bstr_t)m_pRecord->GetFields()->GetItem("bookconcern")->Value;
		m_list.SetItemText(i,3,fieldvalue);

		fieldvalue =(TCHAR*) (_bstr_t)m_pRecord->GetFields()->GetItem("price")->Value;
		m_list.SetItemText(i,4,fieldvalue);

		i+=1;
		m_pRecord->MoveNext();
	}
}

導入庫文件
#import "C:\Program Files\Common Files\System\ado\msado15.dll" rename_namespace("ADODB")\
 rename("EOF","ADOEOF")
using namespace ADODB ;
定義變量
_ConnectionPtr m_pCon;
_RecordsetPtr m_pRecord;
數據庫的初始化,
AfxOleInit();
	m_pCon.CreateInstance(__uuidof(Connection));
	m_pRecord.CreateInstance(__uuidof(Recordset));

	m_pCon->ConnectionString = "Provider=Microsoft.Jet.OLEDB.4.0; \
		Data Source=./Menu.mdb;Persist Security Info=False";

	try
	{
		m_pCon->Open("","","",-1);
	}
	catch(...)
	{
		AfxMessageBox("數據庫連接錯誤",0,0);
		exit;
	}

 
發表評論
所有評論
還沒有人評論,想成為第一個評論的人麼? 請在上方評論欄輸入並且點擊發布.
相關文章