VC6连接Oracle10g

在这之前，都没用VC去访问过Oracle，一直都是用的Java和Oracle做开发的。Java对数据库的封装确实很精妙，通过JDBC，很简单的就可以和数据库连接起来。

 

今天用VC来连接Oracle，弄了好久，一会出这个错误，一会出那个错误，幸好对Oracle足够的熟悉，才恍恍的搞定了

 

VC连接Oracle大致分为一下几个步骤(这里以MFC的基于对话框的程序）

 

1，在StdAfx.h中，将msado15.dll动态链接库引入

#import "c:/program files/common files/system/ado/msado15.dll" no_namespace rename("EOF", "adoEOF")

 

2,定义变量，一个是连接Connection，另一个是记录结果集RecordSet

_ConnectionPtr m_pConnection; _RecordsetPtr m_pRecordset;

3，创建连接，通过创建实例，并且根据URL，Username，Password，来创建一个数据库连接

 AfxOleInit(); try { m_pConnection.CreateInstance(__uuidof(Connection)); m_pRecordset.CreateInstance(__uuidof(Recordset)); CString m_sConn="Provider=OraOLEDB.Oracle.1;Password=admin;Persist Security Info=True;User ID=hk;Data Source=/"(DESCRIPTION =(ADDRESS_LIST =(ADDRESS = (PROTOCOL = TCP)(HOST = 127.0.0.1)(PORT = 1521)) )(CONNECT_DATA = (SID = orcl)))/""; m_pConnection->Open((_bstr_t)m_sConn,"","",adConnectUnspecified); CString strSql = "select * from heap"; BSTR bstrSQL = strSql.AllocSysString(); m_pRecordset->Open(bstrSQL, (IDispatch*)m_pConnection, adOpenDynamic, adLockOptimistic,adCmdText); _variant_t TheValue; //VARIANT数据类型 while(!m_pRecordset->adoEOF) { TheValue= m_pRecordset->GetCollect("dummy");//得到字段BIG_NAME的值 if(TheValue.vt != VT_NULL) { m_lstName.AddString ((char*)_bstr_t(TheValue)); } m_pRecordset->MoveNext(); } m_pRecordset->Close(); m_pConnection->Close(); UpdateData (false); } catch (_com_error e) { AfxMessageBox(e.Description() + " error"); long errorCode=e.WCode(); if(3127==errorCode) AfxMessageBox("表不存在"); if(3092==errorCode) AfxMessageBox("表已经存在"); return ; }

 

其中

AfxOleInit();

这一行代码不能少，它初始化数据库连接的准备工作