请问ADO的recordset如何才能读出ORACLE日期字段内容（急）？

Question

try
  {
   m_pRs1->MoveFirst();
   while(m_pRs1->EndOfFile == false)
   {
    _variant_t TheValue1,TheValue2,TheValue3;
    CString    stritem1,stritem2,stritem3;
    //事件序号,事件内容为varchar2型字段,事件时间为Date型字段
    TheValue1 = m_pRs1->GetCollect("事件序号");
    TheValue2 = m_pRs1->GetCollect("事件时间");
    TheValue3 = m_pRs1->GetCollect("事件内容");
    stritem1 = (TheValue1.vt!=VT_NULL)?(char*)_bstr_t(TheValue1):("");
//下面这行不报错，但是无结果
    stritem2 = (TheValue2.vt!=VT_NULL)?(char*)_bstr_t(TheValue2.date):("");
    stritem3 = (TheValue3.vt!=VT_NULL)?(char*)_bstr_t(TheValue3):("");    m_pRs1->MoveNext();
   }
  }
  catch (_com_error &e)
  {
   GenerateError(e.Error(), e.Description());
  }

Answer 1

COleDateTime oletime(TheValue2 );
oletime.Format(...);
oletime.GetYear();