本文介绍了使用ADO连接和操作Access数据库的方法，包括连接数据库、打开结果集、操作结果集、执行SQL语句和调用存储过程等基本步骤。通过示例程序展示了如何通过ADO直接操作Access数据库，实现数据的读取、插入、修改和删除等功能。
VC++访问Access
2009-08-23 21:58:54| 分类：Windows编程 | 标签：|字号大中小订阅
转载出处：http://blog.youkuaiyun.com/wanshi131/archive/2007/08/25/1758790.aspx
以前的时候用VC写了两种连接Access数据库的方法，为了方便以后查找把这两种方法做一下简单的介绍。Windows平台的数据接口标准有ODBC、OLE DB、ADO和Borland的BDE接口，ODBC(Open DataBase Connectivity)只能用于访问关系型数据库，为了访问非关系型数据微软设计了OLE DB接口并在此基础上推出了ADO(ActiveX Da
使用ADO连接数据库，因为要使用COM，需要初始化(CoInitialize).然后就可以生成接口的对象操作，代码如下：
#imp
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;Da
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;
}
----------------------------------------------------------------------------------------------------------------------------------------
出处：http://www.vckbase.com/document/viewdoc/?id=1215
VC++6.0 中用 ADO 存取 Access 数据库的一点总结
作者：querw
北方工业大学计算机2000级4班
下载源代码
事情是这样的，我的女朋友想要对日常生活的开销做个记录，以便控制花钱的尺度。看她每日用笔头记录，然后和我抢电脑用，曰：要用附件中的计算器统计结果，每每如此 ，不胜其烦，就给她做了一个个人家庭记帐系统，一劳永逸解决问题。期间用到了ADO操作Access数据库，在网上找了若干关于ADO的资料结合实践总结了一点使用心得如下 ，供有相同需求的朋友参考：
附带了那个个人记帐系统,运行的界面如下：
VC++下使用ADO编写数据库程序
准备：
(1)、引入ADO类
#import "c:\program files\common files\system\ado\msado15.dll" \ no_namespace \ rename ("EOF", "adoEOF")
(2)、初始化COM
在MFC中可以用AfxOleInit();非MFC环境中用:
CoInitialize(NULL); CoUnInitialize();
(3)#imp
1.连接和关闭数据库 (1)连接
例子:连接Access数据库
m_pConnection.CreateInstance(__uuidof(Connection)); try { // 打开本地Access库Demo.mdb m_pConnection->Open("Provider=Microsoft.Jet.OLEDB.4.0;Da
(2)、关闭
//如果数据库连接有效
if(m_pConnection->State) m_pConnection->Close(); m_pConnection= NULL;
(3)、设置连接时间 //设置连接时间-----------------------------------
pConnection->put_ConnectionTimeout(long(5));
2.打开一个结果集
(1)打开,首先创建一个_RecordsetPtr实例,然后调用Open()得到一条SQL语句的执行结果
_RecordsetPtr m_pRecordset; m_pRecordset.CreateInstance(__uuidof(Recordset)); // 在ADO操作中建议语句中要常用try...catch()来捕获错误信息， // 因为它有时会经常出现一些意想不到的错误。jingzhou xu try { m_pRecordset->Open("SELECT * FROM DemoTable",// 查询DemoTable表中所有字段 m_pConnection.GetInterfacePtr(), // 获取库接库的IDispatch指针 adOpenDynamic, adLockOptimistic, adCmdText); } catch(_com_error *e) { AfxMessageBox(e->ErrorMessage()); }
(2)关闭结果集
m_pRecordset->Close();
3.操作一个结果集
(1)、遍历(读取)
a)、用pRecordset->adoEOF来判断数据库指针是否已经移到结果集的末尾了；m_pRecordset->BOF判断是否 在第一条记录前面：
while(!m_pRecordset->adoEOF) { var = m_pRecordset->GetCollect("Name"); if(var.vt != VT_NULL) strName = (LPCSTR)_bstr_t(var); var = m_pRecordset->GetCollect("Age"); if(var.vt != VT_NULL) strAge = (LPCSTR)_bstr_t(var); m_AccessList.AddString( strName + " --> "+strAge ); m_pRecordset->MoveNext(); }
b)、取得一个字段的值的办法有两种办法
一是
//表示取得第0个字段的值
m_pRecordset->GetCollect("Name");
或者
m_pRecordset->GetCollect(_variant_t(long(0));
二是
pRecordset->get_Collect("COLUMN_NAME");
或者
pRecordset->get_Collect(long(index));
(2)、添加
a)、调用m_pRecordset->AddNew();
b)、调用m_pRecordset->PutCollect();给每个字段赋值
c)、调用m_pRecordset->Update();确认
(3)、修改
(4)、删除
a)、把记录指针移动到要删除的记录上,然后调用Delete(adAffectCurrent)
try { // 假设删除第二条记录 m_pRecordset->MoveFirst(); m_pRecordset->Move(1); // 从0开始 m_pRecordset->Delete(adAffectCurrent); // 参数adAffectCurrent为删除当前记录 m_pRecordset->Update(); } catch(_com_error *e) { AfxMessageBox(e->ErrorMessage()); }
4.直接执行SQL语句,除了要用到结果集其余的大部分功能都可以直接用SQL语言实现
(1)、用_CommandPtr和_RecordsetPtr配合
_CommandPtr m_pCommand; m_pCommand.CreateInstance(__uuidof(Command)); // 将库连接赋于它 m_pCommand->ActiveConnection = m_pConnection; // SQL语句 m_pCommand->CommandText = "SELECT * FROM DemoTable"; // 执行SQL语句，返回记录集 m_pRecordset = m_pCommand->Execute(NULL, NULL,adCmdText);
(2)、直接用_ConnectionPtr执行SQL语句
_RecordsetPtr Connection15::Execute ( _bstr_t CommandText, VARIANT * RecordsAffected, long Options ) 其中CommandText是命令字串，通常是SQL命令。 参数RecordsAffected是操作完成后所影响的行数, 参数Options表示CommandText中内容的类型，Options可以取如下值之一： adCmdText:表明CommandText是文本命令 adCmdTable:表明CommandText是一个表名 adCmdProc:表明CommandText是一个存储过程 adCmdUnknown:未知 例子: _variant_t RecordsAffected; m_pConnection->Execute("UPDATE users SET old = old+1",&RecordsAffected,adCmdText);
5.调用存储过程
(1)、利用_CommandPtr
_CommandPtr m_pCommand; m_pCommand.CreateInstance(__uuidof(Command)); m_pCommand->ActiveConnection = m_pConnection; // 将库连接赋于它 m_pCommand->CommandText = "Demo"; m_pCommand->Execute(NULL,NULL, adCmdStoredProc);
(2)、直接用_ConnectionPtr直接调用(见4.(2))
6.遍历数据库中的所有表名
_ConnectionPtr m_pConnect; _RecordsetPtr pSet; HRESULT hr; try { hr = m_pConnect.CreateInstance("ADODB.Connection"); if(SUCCEEDED(hr)) { CString dd; dd.Format("Provider=Microsoft.Jet.OLEDB.4.0;Da
7.遍历一个表中的所有字段
Field * field = NULL; HRESULT hr; Fields * fields = NULL; hr = m_pRecordset->get_Fields (&fields); //得到记录集的字段集和 if(SUCCEEDED(hr)) fields->get_Count(&ColCount); //得到记录集的字段集合中的字段的总个数 for(i=0;iItem[i]->get_Name(&bstrColName); //得到记录集//中的字段名 strColName=bstrColName; nameField = strColName; m_FieldsList.AddString(nameField); } if(SUCCEEDED(hr)) fields->Release();//释放指针
附:
1、_variant_t
(1)、一般传给这3个指针的值都不是MFC直接支持的数据类型,而要用_variant_t转换一下
_variant_t(XX)可以把大多数类型的变量转换成适合的类型传入：
(2)、_variant_t var;
_variant_t -> long: (long)var; _variant_t -> CString: CString strValue = (LPCSTR)_bstr_t(var); CString -> _variant_t: _variant_t(strSql);
2、BSTR宽字符串与CString相互转换
BSTR bstr; CString strSql; CString -> BSTR: bstr = strSql.AllocSysString(); BSTR -> CString: strSql = (LPCSTR)bstr;
3、_bstr_t与CString相互转换
_bstr_t bstr; CString strSql; CString -> _bstr_t: bstr = (_bstr_t)strSql; _bstr_t -> CString: strSql = (LPCSTR)bstr;
4、关于时间
Access:表示时间的字符串#2004-4-5#
Sql:表示时间的字符串''2004-4-5''
DateField(时间字段) select * from my_table where DateField > #2004-4-10#
-----------------------------------------------------------------------------------------------------------------------------------------
出处：http://www.programfan.com/blog/article.asp?id=28876
baidu记录VC访问ACCESS
VC调用ACCESS数据库，高分求助
有高手愿意指导，或者帮我调就感谢了
最佳答案
将库从XP转到2003，是没有问题的，在转回去也可以。但是从97转到2003就有问题了，起初我也遇到类似的问题。你说的是出错现象，我们无法猜想出你的程序
哪里有问题，出现bug。建议你在对数据库操作的时候都加上断言（assert）,
参考资料 http://msdn.microsoft.com/library/chs/default.asp?url=/library/CHS/cpguide/html/cpconassert.asp
或者在对数据库操作的时候都加上错误处理(try{...}catch(...){...})，这样就可以知道错误出现在哪里，例如：
BOOL CODBCHandle::SetConnection(CString strDSN, CString strUID, CString strPWD)
{
CString str;
str.Format("DSN=%s;UID=%s;PWD=%s", strDSN, strUID, strPWD);
BOOL bStatus = FALSE; //数据库是否成功打开
m_database.SetLoginTimeout(3); //连接超时属性
try
{
if(!m_database.IsOpen())
{
bStatus = m_database.OpenEx(str, CDatabase::openReadOnly | CDatabase::noOdbcDialog);
if(bStatus)
AfxMessageBox("连接成功.");
}
}
catch(CMemoryException *pEx) //处理内存异常
{
pEx->ReportError();
return FALSE;
}
catch(CDBException *pDBEx) //处理数据库异常
{
pDBEx->ReportError();
TRACE("RetCode:%d strError:[%s] strState:[%s]\n", pDBEx->m_nRetCode, pDBEx->m_strError, pDBEx->m_strStateNativeOrigin);
return FALSE;
}
return TRUE;
}
try{...}catch(...){...}参考资料 http://msdn.microsoft.com/library/chs/default.asp?url=/library/CHS/csref/html/vclrfthetrycatchstatement.asp
以上是追踪错误处理。但是不知道你的程序是什么样的，所以不知道怎么处理。
2：方法
用vc访问Access数据库，就向上面朋友说的那样就可以。操作Access可以不通过数据源，直接对其访问。
访问数据库的模型一般为ODBC,DAO,ADO等。上面的朋友就用的是ADO,你可以看看，他在开始时，在程序里引进了msado15.dll 动态库。这里面封装了ADO的对象、
方法和属性等等。然后初始化COM库，再用_ConnectionPtr对象(它就是ADO的3个对象之一)进行连接数据库，_RecordsetPtr对象是记录集对象，我们对库的操作
大多就是对它的操作，它里面有好多函数，你可以查MSDN。
我上面的代码是用ODBC方式连接，ODBC方式是最地层的，也是通用的模式。可以说他支持任何库。关于ODBC，微软提供了CDatabase类和CRecordset类，使用方法
和以上差不多。有什么问题再聊。
建议以后把问题说的清楚一些，要不我们帮不上你什么忙了。
2.在stdafx.h中导入msado15.dll
#imp
#endif // _AFX_NO_AFXCMN_SUPPORT
可以换成另一种方式调用:
#include <comdef.h>
#include "msado15.tlh"
要在工程目录下面加上msado15.tlh,msado15.tli
3.初始话COM,在test.cpp文件中
BOOL CTestApp::InitInstance()
{
AfxOleInit();//初始话
AfxEnableControlContainer();
4.进入按钮事件.
void CTestDlg::On
{
// TODO: Add your control notification handler co
_ConnectionPtr connection;
_RecordsetPtr recordset;
connection.CreateInstance( __uuidof(Connection));
recordset.CreateInstance(__uuidof(Recordset));
int ID = 0;
connection->Open("Provider=Microsoft.JET.OLEDB.4.0;Da
recordset->Open("SELECT * FROM word",_variant_t((IDispatch *)connection,true),adOpenStatic,adLockOptimistic,adCmdText); //选择WORD表中的所有记录,黑体字的如果有问题可以改这个试试SELECT * FROM [word while (!(recordset->adoEOF)) {
int id = recordset->GetCollect("ID").intVal;//文件中存在的ID字段
if ( id > ID)
ID = id;
recordset->MoveNext();
}
recordset->Close();
connection->Close();
}
直接通过ADO操作Access数据库
作者/徐景周
我在《VC知识库在线杂志》第十四期和第十五期上曾发表了两篇文章——“直接通过ODBC读、写Excel表格文件”和“直接通过DAO读、写Access文件”，先后给大家介绍了ODBC和DAO两种数据库访问技术的基本使用方法，这次要给大家介绍的是ADO数据库访问技术的使用方法。ADO(Active Da
在示例程序中我们仍采用原库结构，数据库名Demo.mdb，库内表名DemoTable，表内字段名为Name(姓名)和Age(年龄)的两个字段，来构造示例程序操作所需的Access数据库，这也和上两篇文章的示例源码中的库结构相兼容。
下面让我们看看ADO数据库访问技术使用的基本步骤及方法：
首先，要用#imp
#import "c:\program files\common files\system\ado\msado15.dll" \ no_namespace \ rename ("EOF", "adoEOF")
其中路径名可以根据自己系统安装的ADO支持文件的路径来自行设定。当编译器遇到#imp
其次，在程序初始过程中需要初始化组件，一般可以用CoInitialize(NULL);来实现，这种方法在结束时要关闭初始化的COM，可以用下面语句CoUnInitialize();来实现。在MFC中还可以采用另一种方法来实现初始化COM，这种方法只需要一条语句便可以自动为我们实现初始化COM和结束时关闭COM的操作，语句如下所示： AfxOleInit();
接着，就可以直接使用ADO的操作了。我们经常使用的只是前面用#imp
1、_ConnectionPtr智能指针，通常用于打开、关闭一个库连接或用它的Execute方法来执行一个不返回结果的命令语句(用法和_CommandPtr中的Execute方法类似)。
——打开一个库连接。先创建一个实例指针，再用Open打开一个库连接，它将返回一个IUnknown的自动化接口指针。代码如下所示：
_ConnectionPtr m_pConnection; // 初始化COM,创建ADO连接等操作 AfxOleInit(); m_pConnection.CreateInstance(__uuidof(Connection)); // 在ADO操作中建议语句中要常用try...catch()来捕获错误信息， // 因为它有时会经常出现一些意想不到的错误。jingzhou xu try { // 打开本地Access库Demo.mdb m_pConnection->Open("Provider=Microsoft.Jet.OLEDB.4.0;Da
——关闭一个库连接。如果连接状态有效，则用Close方法关闭它并赋于它空值。代码如下所示：
if(m_pConnection->State) m_pConnection->Close(); m_pConnection= NULL;
2、_RecordsetPtr智能指针，可以用来打开库内数据表，并可以对表内的记录、字段等进行各种操作。
——打开数据表。打开库内表名为DemoTable的数据表，代码如下：
_RecordsetPtr m_pRecordset; m_pRecordset.CreateInstance(__uuidof(Recordset)); // 在ADO操作中建议语句中要常用try...catch()来捕获错误信息， // 因为它有时会经常出现一些意想不到的错误。jingzhou xu try { m_pRecordset->Open("SELECT * FROM DemoTable", // 查询DemoTable表中所有字段 theApp.m_pConnection.GetInterfacePtr(), // 获取库接库的IDispatch指针 adOpenDynamic, adLockOptimistic, adCmdText); } catch(_com_error *e) { AfxMessageBox(e->ErrorMessage()); }
——读取表内数据。将表内数据全部读出并显示在列表框内，m_AccessList为列表框的成员变量名。如果没有遇到表结束标志adoEOF，则用GetCollect(字段名)或m_pRecordset->Fields->GetItem(字段名)->Value方法，来获取当前记录指针所指的字段值，然后再用MoveNext()方法移动到下一条记录位置。代码如下所示：
_variant_t var; CString strName,strAge; try { if(!m_pRecordset->BOF) m_pRecordset->MoveFirst(); else { AfxMessageBox("表内数据为空"); return; } // 读入库中各字段并加入列表框中 while(!m_pRecordset->adoEOF) { var = m_pRecordset->GetCollect("Name"); if(var.vt != VT_NULL) strName = (LPCSTR)_bstr_t(var); var = m_pRecordset->GetCollect("Age"); if(var.vt != VT_NULL) strAge = (LPCSTR)_bstr_t(var); m_AccessList.AddString( strName + " --> "+strAge ); m_pRecordset->MoveNext(); } // 默认列表指向第一项，同时移动记录指针并显示 m_AccessList.SetCurSel(0); } catch(_com_error *e) { AfxMessageBox(e->ErrorMessage()); }
——插入记录。可以先用AddNew()方法新增一个空记录，再用PutCollect(字段名,值)输入每个字段的值，最后再Update()更新到库中数据既可。其中变量m_Name和m_Age分别为姓名及年龄编辑框的成员变量名。代码所下所示：
try { // 写入各字段值 m_pRecordset->AddNew(); m_pRecordset->PutCollect("Name", _variant_t(m_Name)); m_pRecordset->PutCollect("Age", atol(m_Age)); m_pRecordset->Update(); AfxMessageBox("插入成功!"); } catch(_com_error *e) { AfxMessageBox(e->ErrorMessage()); }
——移动记录指针。移动记录指针可以通过MoveFirst()方法移动到第一条记录、MoveLast()方法移动到最后一条记录、MovePrevious()方法移动到当前记录的前一条记录、MoveNext()方法移动到当前记录的下一条记录。但我们有时经常需要随意移动记录指针到任意记录位置时，可以使用Move(记录号)方法来实现，注意: Move()方法是相对于当前记录来移动指针位置的，正值向后移动、负值向前移动，如：Move(3)，当前记录是3时，它将从记录3开始往后再移动3条记录位置。代码如下所示：
try { int curSel = m_AccessList.GetCurSel(); // 先将指针移向第一条记录，然后就可以相对第一条记录来随意移动记录指针 m_pRecordset->MoveFirst(); m_pRecordset->Move(long(curSel)); } catch(_com_error *e) { AfxMessageBox(e->ErrorMessage()); }
——修改记录中字段值。可以将记录指针移动到要修改记录的位置处，直接用PutCollect(字段名，值)将新值写入并Update()更新数据库既可。可以用上面方法移动记录指针，修改字段值代码如下所示：
try { // 假设对第二条记录进行修改 m_pRecordset->MoveFirst(); m_pRecordset->Move(1); // 从0开始 m_pRecordset->PutCollect("Name", _variant_t(m_Name)); m_pRecordset->PutCollect("Age", atol(m_Age)); m_pRecordset->Update(); } catch(_com_error *e) { AfxMessageBox(e->ErrorMessage()); }
——删除记录。删除记录和上面修改记录的操作类似，先将记录指针移动到要修改记录的位置，直接用Delete()方法删除它并用Update()来更新数据库既可。代码如下所示：
try { // 假设删除第二条记录 m_pRecordset->MoveFirst(); m_pRecordset->Move(1); // 从0开始 m_pRecordset->Delete(adAffectCurrent); // 参数adAffectCurrent为删除当前记录 m_pRecordset->Update(); } catch(_com_error *e) { AfxMessageBox(e->ErrorMessage()); }
——关闭记录集。直接用Close方法关闭记录集并赋于其空值。代码如下所示：
m_pRecordset->Close(); m_pRecordset = NULL;
3、CommandPtr智能指针，可以使用_ConnectionPtr或_RecordsetPtr来执行任务，定义输出参数，执行存储过程或SQL语句。
——执行SQL语句。先创建一个_CommandPtr实例指针，再将库连接和SQL语句做为参数，执行Execute()方法既可。代码如下所示：
_CommandPtr m_pCommand; m_pCommand.CreateInstance(__uuidof(Command)); m_pCommand->ActiveConnection = m_pConnection; // 将库连接赋于它 m_pCommand->CommandText = "SELECT * FROM DemoTable"; // SQL语句 m_pRecordset = m_pCommand->Execute(NULL, NULL,adCmdText); // 执行SQL语句，返回记录集
——执行存储过程。执行存储过程的操作和上面执行SQL语句类似，不同点仅是CommandText参数中不再是SQL语句，而是存储过程的名字，如Demo。另一个不同点就是在Execute()中参数由adCmdText(执行SQL语句)，改为adCmdStoredProc来执行存储过程。如果存储过程中存在输入、输出参数的话，需要使用到另一个智能指针_ParameterPtr来逐次设置要输入、输出的参数信息，并将其赋于_CommandPtr中Parameters参数来传递信息，有兴趣的读者可以自行查找相关书籍或MSDN。执行存储过程的代码如下所示：
_CommandPtr m_pCommand; m_pCommand.CreateInstance(__uuidof(Command)); m_pCommand->ActiveConnection = m_pConnection; // 将库连接赋于它 m_pCommand->CommandText = "Demo"; m_pCommand->Execute(NULL,NULL, adCmdStoredProc);
扫一扫
127
被折叠的 条评论
为什么被折叠?
到【灌水乐园】发言
