15 мая 2023 года "Исходники.РУ" отмечают своё 23-летие!
Поздравляем всех причастных и неравнодушных с этим событием!
И огромное спасибо всем, кто был и остаётся с нами все эти годы!

Главная Форум Журнал Wiki DRKB Discuz!ML Помощь проекту


ODBC через DAO

CDaoDatabase MyDb = new CDaoDatabase();

        m_DaoServerDB.Open(NULL,FALSE,FALSE,
       "ODBC;DSN=SAMS_SVR;UID=admin;PWD=admin");

        CDaoRecordset MySet = new CDaoRecordset(MyDb);
        MySet->Open(AFX_DAO_USE_DEFAULT_TYPE,
        "SELECT * FROM some_table");

        VARIANT *vFieldValue;
        COleVariant covFieldValue;
        CString Holder;

        while(!MySet->IsEOF())
        {
             MySet->GetFieldValue("FIELD_1", covFieldValue);
             vFieldValue = (LPVARIANT)covFieldValue;
             
             if(vFieldValue->vt!-VT_NULL)
             {
                Holder.Format("%s",vFieldValue->pbVal);
                m_List.AddString(Holder);
             }
              
             MySet.MoveNext();
         }