ADO方法对Access数据库操作

1、新建一个Accesss数据库文件，然后文件-新建-空白桌面数据库，弹出下面的窗口。点击那个小文件夹的图标，出现下面的窗口，保存类型选择20022003格式，文件名shujuku.mdb，然后确定，创建。然后在设计视图中设计数据库成下面的样式。再在数据库中增添一些信息如下：然后保存就可以了，记得注意一下把“表1”这个名字改过来啊。二、在VC+中建立一个基于对话框的工程(在这里取名为sjtest) 1、在FileView中的Header Files的头文件中导入文件。(代码如下) #import "C:Program FilesCommon FilesSystemadomsado15.d

2、ll" no_namespace rename("EOF","adoEOF")rename("BOF","adoBOF") 2、在主窗口类声明两个变量。(在中) 代码：（这两个是智能指针，百度一下哈）_ConnectionPtrm_pConnection; _RecordsetPtrm_pRecordset; 3、在对话框中添加一个ListControl控件，并且将其属性中的Style设置如图4、为list control捆绑变量m_Grid（查看建立类向导Add Member variable name

3、）5、在CSjtestApp应用程序类中的初始化函数InitInstance()中初始化COM环境在上面添加：:CoInitialize(NULL); 并在return之前释放：添加代码如下：:CoUninitialize();6、建立ADO连接数据库函数在主窗口类(CSjktestDlg)库中添加函数OnInitADOConn()如图：并在函数体中写上下面的语句：try/创建连接对象实例("");/设置连接字符串CStringstrConnect="DRIVER=Microsoft Access Driver (*.mdb);uid=;pwd=;DBQ=shuj

4、uku.mdb;"/使用Open方法连接数据库m_pConnection->Open(_bstr_t)strConnect,"","",adModeUnknown);catch(_com_error e)AfxMessageBox("连接数据失败，请检查数据库路径是否正确！");这里，是你建立的Access数据库的名字。7、建立关闭记录集和连接函数ExitConnect()。在主窗口类(CSjktestDlg)库中添加函数ExitConnect()如图：在函数体上写上：if(m_pRecordset!=NULL)m_p

5、Recordset->Close();m_pConnection->Close();8、接着在初始化对话框中调用OnInitADOConn函数，已经获取数据库表中数据并显示在列表控件中。代码如下: (LVS_EX_FLATSB |LVS_EX_FULLROWSELECT |LVS_EX_HEADERDRAGDROP |LVS_EX_ONECLICKACTIVATE |LVS_EX_GRIDLINES); (0,"员工编号",LVCFMT_LEFT,80,0); (1,"员工姓名",LVCFMT_LEFT,80,1); (2,"所属部

6、门",LVCFMT_LEFT,80,2); (3,"基本工资",LVCFMT_LEFT,80,3); /连接数据库OnInitADOConn(); /设置查询字符串_bstr_tbstrSQL = "select * from employees order by 员工编号desc" /创建记录集指针对象实例(_uuidof(Recordset);/该句也可以使用/ (“”);代替/打开记录集m_pRecordset->Open(bstrSQL,m_pConnection.GetInterfacePtr(),adOpenDynamic,

7、adLockOptimistic,adCmdText); while(!m_pRecordset->adoEOF) (0,""); m_Grid.SetItemText(0,0,(char*)(_bstr_t)m_pRecordset->GetCollect("员工编号"); m_Grid.SetItemText(0,1,(char*)(_bstr_t)m_pRecordset->GetCollect("员工姓名"); m_Grid.SetItemText(0,2,(char*)(_bstr_t)m_pRecordset->GetCollect("所属部门"); m_Grid.SetItemText(0,3,(char*)(_bstr_t)m_pRecordset->GetCollect("基本工资"); /将记录集指针移动到下一条记录m_pRecordset->M