求教ADO数据库专家

Question

下面一段代码是用MFC ODBC写的 如果用ADO怎么写
try
        {
                recordset.Open(AFX_DB_USE_DEFAULT_TYPE,"select id,photoid,name,department,canbeadd from users";
        }
        catch(CDBException e)
        {
                AfxMessageBox(e.m_strError);
                return;
        }
       
        CDBVariant id,photoid,beadd;
        int index=0;
        while(!recordset.IsEOF())
        {               
                recordset.GetFieldValue(short(0),id);
                index=id.m_lVal-UserIdRadix;
                recordset.GetFieldValue(1,photoid);
                recordset.GetFieldValue(2,m_pUsers[index].Name);
                recordset.GetFieldValue(3,m_pUsers[index].Department);
                recordset.GetFieldValue(4,beadd);               
                m_pUsers[index].Id=id.m_lVal;
                m_pUsers[index].PhotoId=photoid.m_lVal;
                m_pUsers[index].CanbeAdd=beadd.m_chVal;
                recordset.MoveNext();
        }