可以直接把EXCEL当数据库操作啊~ 会ADO吗? 用两个记录集分别打开两个数据库,再循环访问其中一个记录集,把数据转到另外一个就可以了啊..参考:http://blog.csdn.net/tabby/archive/2007/11/16/1889217.aspx如果是把ACCESS转到EXCEL,有更方便的方法:参考如下代码:_RecordsetPtr m_pRs;
_ConnectionPtr m_pConn;
try
{
CoInitialize(NULL);
m_pConn.CreateInstance(__uuidof(Connection));
m_pRs.CreateInstance(__uuidof(Recordset));
//设置服务器端游标
m_pConn->CursorLocation = adUseServer;//adUseClient;adUseNone
//连接ACCESS数据库
m_pConn->Open(L"Provider=Microsoft.Jet.OLEDB.4.0;Data Source=test.mdb;Persist Security Info=False",
L"",L"",adOpenUnspecified);
m_pRs->PutRefActiveConnection(m_pConn);
m_pRs->Open("select * into [Excel 5.0;HDR=YES;DATABASE=c:\\tanyizhi.xls].[sheet1] from users",_variant_t((IDispatch*)m_pConn,true),adOpenDynamic,adLockOptimistic,adCmdUnknown);
m_pRs=NULL;
m_pConn=NULL;
CoUninitialize();
}
catch(_com_error &e)
{
AfxMessageBox(e.Description());
}
_ConnectionPtr m_pConn;
try
{
CoInitialize(NULL);
m_pConn.CreateInstance(__uuidof(Connection));
m_pRs.CreateInstance(__uuidof(Recordset));
//设置服务器端游标
m_pConn->CursorLocation = adUseServer;//adUseClient;adUseNone
//连接ACCESS数据库
m_pConn->Open(L"Provider=Microsoft.Jet.OLEDB.4.0;Data Source=test.mdb;Persist Security Info=False",
L"",L"",adOpenUnspecified);
m_pRs->PutRefActiveConnection(m_pConn);
m_pRs->Open("select * into [Excel 5.0;HDR=YES;DATABASE=c:\\tanyizhi.xls].[sheet1] from users",_variant_t((IDispatch*)m_pConn,true),adOpenDynamic,adLockOptimistic,adCmdUnknown);
m_pRs=NULL;
m_pConn=NULL;
CoUninitialize();
}
catch(_com_error &e)
{
AfxMessageBox(e.Description());
}
至于导出到Excel,更简单了,写TXT文件就是了,同一行的几条数据之中用逗号隔开,行与行当然是回车换行隔开,然后文件格式保存为".csv"便可。