VPF::ODBC + MFC - Форум программистов

Kirow

Дата 10.10.2011, 15:58 (ссылка)

(нет голосов)

Загрузка ...

Новичок

Профиль
Группа: Участник
Сообщений: 31
Регистрация: 1.11.2007

Репутация: нет
Всего: нет

Есть диалоговое окно со списком и кнопкой по нажатию на которую выполняется следующий код:

Код


        CDatabase database;
    CString sSql;
    CString sItem1, result;
    CString sDriver;
    CString sDsn;
    CString sFile = "...\\Пример БД.mdb"; //либо .xls/.xlsx        
    m_ctrlList.ResetContent();

    sDriver = GetExcelDriver(); //функция получения драйвера ODBC
    if( sDriver.IsEmpty() )
    {
        AfxMessageBox("No Excel ODBC driver found");
        return;
    }

    sDsn.Format("ODBC;DRIVER={%s};DSN='';DBQ=%s",sDriver,sFile);

    TRY
    {        
        database.Open(NULL,false,false,sDsn);        
        CRecordset recset( &database );
                
        sSql = "SELECT * FROM AccessDB2 "; //тут таблицу AccessDB2  указываю вручную прямо в коде, что не есть 
                                                                       //хорошо т.к. это привязывает программу к одной единственной таблице 
        recset.Open(CRecordset::forwardOnly,sSql,CRecordset::readOnly);

//Получаю заголовки всех полей
        CODBCFieldInfo info;
        for (int i = 0; i < recset.GetODBCFieldCount();i++)
        {
            recset.GetODBCFieldInfo(i, info);
            sItem1 = info.m_strName;
            result += sItem1 +" ";
        }
        m_ctrlList.AddString(result);

//считываю все записи из таблицы
        while( !recset.IsEOF() )
        {
            // Read the result line
            result = " ";
            
            for (int i = 0; i < recset.GetODBCFieldCount();i++)
            {
                recset.GetFieldValue(i,sItem1);
                result += sItem1 +" ";
            }

            m_ctrlList.AddString(result);
            recset.MoveNext();
        }        
        database.Close();
    }
    CATCH(CDBException, e)
    {
        // A database exception occured. Pop out the details...
        AfxMessageBox("Database error: "+e->m_strError);
    }
    END_CATCH;

Вопрос заключается в следующем, как программно получить список таблиц подключенной БД. Вариант с использованием системной таблицы (как в Access например MSysObjects) не подходит ввиду того что надо использовать разные источники, а судя по всему имена системных таблиц везде разные (хотя не прочь узнать как получить доступ к этой таблице, т.к. у меня "no read permission" на примере Access'a).
Пытался с помощью SQLTable из ODBC API выковырять нужные данные, но вместо имен таблиц получал пути к файлам (либо не правильно делал, либо не предназначено для этого).
В общем если кто-то может подсказать как отталкиваясь от классов CDatabase и CRecordset либо ODBC API можно получить список имен таблиц, буду благодарен.

UPD: Уже нашел решение на примере простого отрывка кода

Код


SQLHSTMT hstmt; 
if (SQLAllocStmt(cdb.m_hdbc,&hstmt)==SQL_SUCCESS) 
{ 
   if (SQLTables(hstmt, NULL,0, NULL,0, NULL,0, NULL,0)==SQL_SUCCESS) 
   { 
      SQLRETURN retcode = 0; 
      char Res[128]; 
      CString ResC; 
      SQLINTEGER ResCount = 0; 
      SQLFetch(hstmt); 
      while (retcode != SQL_NO_DATA) 
      { 
         SQLGetDatahstmt,4,SQL_C_DEFAULT,&Res,128,&ResCount); 
               ResC = Res; 
               if (ResC=="TABLE") 
               { 
                  SQLGetData(hstmt,3,SQL_C_DEFAULT,&Res,128,&ResCount); 
                  m_Combo.AddString(Res); 
               } 
               retcode = SQLFetch(hstmt); 
      } 
   }; 
   SQLFreeStmt(hstmt,SQL_DROP);
}

Это сообщение отредактировал(а) Kirow - 11.10.2011, 21:19

0 Пользователей читают эту тему (0 Гостей и 0 Скрытых Пользователей)
0 Пользователей:
« Предыдущая тема \| C/C++: Базы данных \| Следующая тема »