CommandPtr 返回记录集


_CommandPtr   m_pCommand;                       //智能指针
m_pCommand.CreateInstance(__uuidof(Command));   //创建实例
m_pCommand->ActiveConnection = ADOConn;         //设置连接
m_pCommand->CommandText = "P_TEMP";             //存储过程名
m_pCommand->CommandType = adCmdStoredProc;      //指定类型
       _RecordsetPtr   m_pRet;
m_pRet.CreateInstance(__uuidof(Recordset));                 //记录集
        m_pRet = m_pCommand->Execute(NULL, NULL, adCmdStoredProc);  //执行存储过程     adCmdUnknown while(!m_pRet->EndOfFile)             //EndOfFile                   //判断当前是否有记录adoEOF
{
_variant_t      vFieldValue;                           
vFieldValue = m_pRet->GetCollect("Area");              
strcpy(mtlabel.m_szAreaCode, (_bstr_t)vFieldValue);     vFieldValue = m_pRet->GetCollect("Servicecode");    
strcpy(mtlabel.m_szMsgMode, (_bstr_t)vFieldValue);   
  
vFieldValue = m_pRet->GetCollect("msgformat");
strcpy(mtlabel.m_szMsgFormat, (_bstr_t)vFieldValue);  
 
vFieldValue = m_pRet->GetCollect("fee_user_type");
strcpy(mtlabel.m_szFeeUserType, (_bstr_t)vFieldValue); vFieldValue = m_pRet->GetCollect("Fee_type");
strcpy(mtlabel.m_szFeeType, (_bstr_t)vFieldValue);     vFieldValue = m_pRet->GetCollect("fee");
strcpy(mtlabel.m_szFeeCode, (_bstr_t)vFieldValue);    
                  m_pRet->MoveNext();                  //移动到下一条记录
}              m_pRet->EndOfFile 有是出错， 说对象关闭，不允许操作, 请高手帮我解答一下，非常感谢。