操作系统:win7 64bit
软件环境:VS2012,
本地客户端使用Oracle 11g 64bit
远程服务器端使用Oracle 11g 32bit
1、 导入msado15.dll动态链接库
#import "C:\Program Files\CommonFiles\System\ado\msado15.dll" no_namespace \ rename("EOF","adoEOF")
2、初始化Com组件
AfxEnableControlContainer();
AfxOleInit(); //初始化COM库
3、连接字符串
CString strConnect;
strConnect.Format("Provider=OraOLEDB.Oracle.1;Password=%s;PersistSecurity Info=True;User ID=%s;\
DataSource=\"(DESCRIPTION =(ADDRESS_LIST =(ADDRESS = (PROTOCOL = TCP)(HOST =%s)\
(PORT = %s)) )(CONNECT_DATA= (SID = %s)))\"",m_sPwd, m_sUid, m_sHost, m_sPort, m_sSid);
创建两个对象:
_ConnectionPtrm_pConnection;
_RecordsetPtrm_pRecordset;
4、连接数据库
try
{
::CoInitialize(NULL); //初始化com环境(必须,否则提示异常)
m_pConnection.CreateInstance(__uuidof(Connection));
m_pConnection->ConnectionTimeout= 10; // 设置连接超时10秒
m_pConnection->Open(_bstr_t(LPCTSTR(strConnect)),"","",adModeUnknown);
m_pConnection->CursorLocation= adUseClient; //设置使用客户端连接
}
catch (_com_error e)
{
AfxMessageBox(e.Description());
return FALSE;
}
catch(...)
{
AfxMessageBox("数据库连接失败!");
return FALSE;
}
Tips:因为本地客户端使用的是64bit版本的Oracle,所以如果编译的时候选择win32,就会抛出异常。说是检查安装。所以要选择使用生成x64版本!!这一点要特别注意!!!
5、读写数据库
如果上述1-4步骤都正确无误,那么读写数据库就是相对比较简单的工作了。
m_pRecordset.CreateInstance("ADODB.Recordset");//创建Recordset实例
strSQL="select * from robin";
try
{
m_pRecordset->Open((_variant_t)strSQL,(IDispatch*)theApp.m_pConnection,adOpenDynamic,adLockOptimistic,adCmdText);
}
catch (_com_error* e)
{
AfxMessageBox(e->ErrorMessage());
}
try
{
nFieldsCount=m_pRecordset->GetFields()->Count;
}
catch (_com_error* e)
{
AfxMessageBox(e->ErrorMessage());//弹出错误对话框
}
接下来就可以通过m_pRecordset来获取查询语句得到的结果了。