y_yy0 2015-07-14 04:14 采纳率: 20%
浏览 1423
已采纳

vc++6.0使用的oracle 9i 如何转换成access2007?

vc++6.0使用的oracle 9i 如何转换成access2007?

  • 写回答

4条回答

  • oyljerry 2015-07-14 04:49
    关注
    
    使用ADO连接数据库,因为要使用COM,需要初始化(CoInitialize).然后就可以生成接口的对象操作,代码如下:
    
    #import "C:Program Files\Common Files\System\ado\msado15.dll" rename("EOF", "adoEOF")    //生成C++类,改变EOF函数的名称
    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;Data   Source=%s"), strDBFile);
        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;
    }
    
    
    本回答被题主选为最佳回答 , 对您是否有帮助呢?
    评论
查看更多回答(3条)

报告相同问题?

悬赏问题

  • ¥15 HFSS 中的 H 场图与 MATLAB 中绘制的 B1 场 部分对应不上
  • ¥15 如何在scanpy上做差异基因和通路富集?
  • ¥20 关于#硬件工程#的问题,请各位专家解答!
  • ¥15 关于#matlab#的问题:期望的系统闭环传递函数为G(s)=wn^2/s^2+2¢wn+wn^2阻尼系数¢=0.707,使系统具有较小的超调量
  • ¥15 FLUENT如何实现在堆积颗粒的上表面加载高斯热源
  • ¥30 截图中的mathematics程序转换成matlab
  • ¥15 动力学代码报错,维度不匹配
  • ¥15 Power query添加列问题
  • ¥50 Kubernetes&Fission&Eleasticsearch
  • ¥15 報錯:Person is not mapped,如何解決?