今天学习用ADO来读取Excel表格数据,其实和读取Access数据库一样,
只是连接字符串不一样
Access数据库的连接字符串为:
_bstr_t strConnect = "";
strConnect = _T("Provider=Microsoft.ACE.OLEDB.12.0;");
strConnect += _T("Data Source=");
strConnect += FileName; //为Access数据库名称
而要连接Excel的字符串为:
_bstr_t strConnect = "";
strConnect = _T("Provider=Microsoft.ACE.OLEDB.12.0;");
strConnect += _T("Data Source=");
strConnect += FileName;//Excel文件名称
strConnect += _T(";Extended Properties='Excel 12.0 Xml;HDR=YES'");
看看是不是差不多,
具体操作就和Access数据库一样了,
1.选引用ADO库
#import "C://Program Files//Common Files//System//ado//msado15.dll" no_namespace rename("EOF","adoEOF")
2.初始和移除ADO环境
::CoInitialize(NULL); //初始化环境,在构造函数中初始
::CoUninitialize(); //移除ADO环境,在析构函数中移除
3.连接数据库
//在头文件中定义
_ConnectionPtr m_pConn;
try
{
m_pConn.CreateInstance(_uuidof(Connection));
m_pConn->Open(strConnect, TEXT(""), TEXT(""), adModeUnknown);
}
catch (_com_error& e)
{
GetComError(TEXT("数据库打开失败"), e);
return FALSE;
}
4.读取数据到_RecordsetPtr记录集中
_RecordsetPtr m_pRecordset;
//lpSql是传递的SQL语句“SELECT * FROM [Sheet2$]"
try
{
m_pRecordset.CreateInstance(_uuidof(Recordset));
m_pRecordset->Open((_variant_t)lpSql,
_variant_t((IDispatch*)m_pConn, true),
adOpenStatic,
adLockOptimistic,
adCmdText);
}
catch (_com_error& e)
{
GetComError(TEXT("打开表单失败"), e);
return FALSE;
}
5.获得指定字段索引的名称
m_pRecordset->GetFields()->GetItem(i)->GetName();
_bstr_t bsrName;
int nCount=m_pRecordset->GetFields()->Count; //获得字段总数
for(int i=0;i<nCount;i++)
{
bsrName=m_pRecordset->GetFields()->GetItem(i)->GetName();
//...
}
6.获得指定字段的值
//循环读取数据
_variant_t var=VT_NULL;
while(!m_pRecordset->adoEOF)
{
var=m_pRecordset->GetCollect(TEXT("ID"); //获得字段为ID名的值
//...
var=m_pRecordset->GetCollect((long)1); //获得字段索引为1的值,
//...
//读取完一条记录要让指针下移
m_pRecordset->MoveNext();
}
7.关闭数据连接
if (m_pRecordset) //关闭,释放记录集
{
m_pRecordset->Close();
m_pRecordset.Release();
}
if (m_pConn->State) //关闭,释放数据库连接
{
m_pConn->Close();
m_pConn.Release();
}
数据库读取后效果:
Excel表格数据