！！！！！请求支援！ADO中怎样用整数序号访问字段

Question

myVarible = p_RS->Fields->GetItem(_variant_t(index))->Value;

Answer 1

 
    if (!m_pUserSet->adoEOF )
        {
                long kk=0;
            do {
                kk=m_pUserSet->GetFields ()->GetCount ();
                _bstr_t filedname[10];
                for (long uu=0;uu<kk;uu++)
                {
                    filedname[uu]=m_pUserSet->GetFields ()->GetItem ((_variant_t)uu)->GetName ();
                    long width=m_pUserSet->GetFields ()->GetItem ((_variant_t)uu)->GetDefinedSize ();
                    long width1=m_pUserSet->GetFields ()->GetItem ((_variant_t)uu)->GetActualSize ();
                    filed=m_pUserSet->GetCollect (filedname[uu]);                
                    CString temp="";
                    temp.Insert (0,(char*)_bstr_t(filed));                    
                  
                    str+=temp;                        
                }
            
                
                m_pUserSet->MoveNext ();
            }while (!m_pUserSet->adoEOF );
        
            
        }