在VS环境下以ADO方式操作Oracle数据库

利用ADO引擎方式访问Oracle数据库的实现方法：

定义数据库头文件为CDBOperation.h

#pragma once  #import "C:\Program Files\Common Files\System\ADO\msado15.dll" no_namespace rename("EOF","adoEOF"),rename("LockTypeEnum","AdoLockTypeEnum"),rename("DataTypeEnum","AdoDataTypeEnum"),\rename("FieldAttributeEnum","AdoFieldAttributeEnum"),rename("EditModeEnum","AdoEditModeEnum"),rename("RecordStatusEnum","AdoRecordStatusEnum"),rename("ParameterDirectionEnum","AdoParameterDirectionEnum")class CDBOperation  {  public:  //构造对象方法 CDBOperation(void);  ~CDBOperation(void);    //连接数据库  bool ConnToDB();    //数据库操作函数（增、删、改、查）   _RecordsetPtr ExecuteWithResSQL(CString);    private:  void PrintErrorInfo(_com_error &);    private:  //初始化数据库连接、命令、记录集  _ConnectionPtr CreateConnPtr();  _CommandPtr CreateCommPtr();  _RecordsetPtr CreateRecsetPtr();    private:  //数据库连接需要的连接、命令、记录集对象  _ConnectionPtr m_pConnection;  _CommandPtr m_pCommand; _RecordsetPtr m_pRecordset;};  

定义程序源文件CDBOperation.cpp

#include "CDBOperation.h"  CDBOperation::CDBOperation(void)  {      CoInitialize(NULL);      m_pConnection = CreateConnPtr();      m_pCommand = CreateCommPtr();m_pRecordset = CreateRecsetPtr();}  CDBOperation::~CDBOperation(void)  {      m_pConnection->Close();  }  bool CDBOperation::ConnToDB()  {      if (NULL == m_pConnection)      {          printf("Failed to create connection\n");          return false;      }      try      {  _bstr_t strConnect="Provider=OraOLEDB.Oracle;User ID=scott;Password=19900624;Persist Security Info=True;Data Source=\"(DESCRIPTION =(ADDRESS_LIST =(ADDRESS = (PROTOCOL = TCP)(HOST = 10.108.85.137)(PORT = 1521)) )(CONNECT_DATA = (SID = ORCL)(SERVER=DEDICATED)))\"";    HRESULT hr=m_pConnection->Open(strConnect,"","",NULL);        if (TRUE == FAILED(hr))          {              return false;          }          m_pCommand->ActiveConnection = m_pConnection;          return true;      }      catch(_com_error &e)      {          PrintErrorInfo(e);          return false;      }  }  _RecordsetPtr CDBOperation::ExecuteWithResSQL(const char *sql)  {      try      {          m_pCommand->CommandText = _bstr_t(sql);          m_pRecordset = m_pCommand->Execute(NULL, NULL, adCmdText);          return m_pRecordset;      }      catch(_com_error &e)      {          PrintErrorInfo(e);          return NULL;      }  }  void CDBOperation::PrintErrorInfo(_com_error &e)  {      printf("Error infomation are as follows\n");      printf("ErrorNo: %d\nError Message:%s\nError Source:%s\nError Description:%s\n", e.Error(), e.ErrorMessage(), (LPCTSTR)e.Source(), (LPCTSTR)e.Description());  }    _ConnectionPtr CDBOperation::CreateConnPtr()  {      HRESULT hr;      _ConnectionPtr connPtr;      hr = connPtr.CreateInstance(__uuidof(Connection));      if (FAILED(hr) == TRUE)      {          return NULL;      }      return connPtr;  }    _CommandPtr CDBOperation::CreateCommPtr()  {      HRESULT hr;      _CommandPtr commPtr;      hr = commPtr.CreateInstance(__uuidof(Command));      if (FAILED(hr) == TRUE)      {          return NULL;      }      return commPtr;  }    _RecordsetPtr CDBOperation::CreateRecsetPtr()  {      HRESULT hr;      _RecordsetPtr recsetPtr;      hr = recsetPtr.CreateInstance(__uuidof(Recordset));      if (FAILED(hr) ==TRUE)      {          return NULL;      }      return recsetPtr;  }  

Oracle数据库的实现main()：

#include <afx.h>  #include "CDBOperation.h"    #include <iostream>  #include <afxinet.h>  #include <afxwin.h>  using namespace std;void main()  {  CDBOperation dbObject;    CString sql;  bool bConn = dbObject.ConnToDB();    if (true == bConn)    {    //AfxMessageBox("connection success \0");  // ::MessageBox(NULL, "abc!",_T("attention"), MB_OKCANCEL  == IDOK);  // MessageBox(NULL,"连接数据库出现错误\0",0,0);    cout<<"数据库连接成功...."<<endl;  }    _RecordsetPtr pRst=NULL;  //创建一个数据集智能指针  pRst.CreateInstance(__uuidof(Recordset));//初始化Recordset指针  char type;  while(true)  {  cout<<"请输入指令（s、a、d、u）："<<endl;  cin>>type;  switch(type)  {  case 's':{  //查询    sql="select * from RECV_TABLE";  pRst = dbObject.ExecuteWithResSQL(sql);    if (NULL == pRst)    {    //MessageBox(NULL,_T("查询数据出现错误！\0"),0,0);    printf("查询数据出现错误！\n");break;   }    if (pRst->adoEOF)    {    pRst->Close();    //AfxMessageBox(_T("There is no records in this table\0"));  //MessageBox(NULL,"There is no records in this table\0",0,0);    printf("There is no records in this table...\n");break;    }    _variant_t vSno, vName;    if(!pRst->BOF)  {  pRst->MoveFirst();//记录集指针移动到查询结果集的前面    }  while (!pRst->adoEOF)    {    vSno = pRst->GetCollect(_variant_t("SID"));    vName = pRst->GetCollect(_variant_t("CONTENT"));    pRst->MoveNext();    if(vSno.vt != VT_NULL)    {    cout<<(LPCTSTR)(_bstr_t)vSno<<(LPCTSTR)(_bstr_t)vName<<endl;  }    }    }   break;  case 'a':{  CTime tm = CTime::GetCurrentTime();  CString str=tm.Format("%Y-%m-%d  %H-%M-%S");  char arr[]="任何问题都可以帮你解决";  char id[] = "S10011";  CString SID= id;  CString content = arr;  sql="insert into RECV_TABLE (SID,CONTENT,TIME) values ('"+SID+"','"+content+"',to_date('"+str+"','yyyy-mm-dd hh24:mi:ss'))";  pRst = dbObject.ExecuteWithResSQL(sql);    if (NULL != pRst)    {    //AfxMessageBox(_T("插入数据成功\n"));    printf("插入数据成功！\n");break;  }    }   break;  case 'd':{  //执行删除语句   //sprintf(sql, "delete  from RECV_TABLE where SID='%s', "S1003");   sql="delete  from RECV_TABLE where SID='S1004'";  pRst = dbObject.ExecuteWithResSQL(sql);    if (NULL != pRst)     {    MessageBox(NULL,_T("删除数据成功\0"),0,0);   break;  }    }   break;  case 'u':{  sql="update RECV_TABLE set CONTENT='[e-mail]' where SID='S1003'";  pRst = dbObject.ExecuteWithResSQL(sql);    if (NULL != pRst)    {    //MessageBox(NULL,_T("更新数据成功\0"),0,0);  printf("更新数据成功！\n");break;  }    }   break;  }  }  system("PAUSE");  }