Доброго времени суток.

Проблема в том, что структура Access-ной БД заранее не известна.
Имена таблиц из БД получаю так:

Он вместе с таблицами выдает и имена запросов. Можно ли их как-то разграничить?

Заодно еще такой вопрос.
Имена полей таблицы получаю так:

уже при работе программы возникает ошибка "Could not convert variant of type (Null) into type (String)", try ... catch ее не ловит, имена полей успешно записываются в ComboBox. С этим можно что-то сделать?

Это сообщение отредактировал(а) CyberBullDog - 12.6.2007, 11:11

вот глянь... какое там продолжение!!!

Это конечно интересно, только вот в Access-е я ничего похожего не нашел.
Да чего там говорить, если в Access оператор select не знает что такое limit.

SELECT Statement (Microsoft Access SQL):
SELECT [predicate] { * | table.* | [table.]field1 [AS alias1] [, [table.]field2 [AS alias2] [, …]]}     FROM tableexpression [, …] [IN externaldatabase]     [WHERE… ]     [GROUP BY… ]     [HAVING… ]     [ORDER BY… ]     [WITH OWNERACCESS OPTION]

(Источник: http://msdn2.microsoft.com/en-us/library/Bb208930.aspx)

он знает TOP!

За TOP спасибо, буду знать.

Кто-нибудь знает как пользоваться ADOX?

Импортировал Microsoft ADO Ext. 2.8 for DDL and Security, прикрутил полученные файлы (ADOX_TLB) к проекту.
Что делать дальше не знаю. Примеры, которые видел, не прокатывают.

Вот один из таких примеров (на Delphi):
http://entwickler-forum.de/archive/index.php/t-10974.html

что конкретно

???

ты компонент нормально поставил?!

Ставил так:
Component->Import Component...
Выбираю Import a Type Library,
дальше ADOX (MS ADO Ext. ...),
на след. странице оставляю как есть,
выбираю Add Unit to 'Myproject'

Пытаюсь уже не открыть готовую базу, а создать новую (все примеры почему-то направлены на это).
Последний раз пробовал так:


Может я уже путаю два разных подхода. В итоге вылезает сообщение: "Интерфейс не поддерживается [Да][Нет][Отмена]".

Было бы не плохо увидеть пример, если таковой есть.

Строка коннекта из UDL-файла не подходит.
Получилось создать базу с  такой строкой коннекта:

А вот как подключиться к уже существующей базе?

В Delphi все получается, а в Builder-е что-то никак.
Буду писать на Delphi.  

CyberBullDog
Не надо заморачиваться с ADOX. Используйте обычные ADO-компоненты и метод TADOConnection->OpenSchema.

Схематически алгоритм выглядит так:

AdoLoadSchema("TABLE", ListBox1); //таблицы
AdoLoadSchema("VIEW", ListBox2);  //виды (запросы)

void TForm1::AdoLoadSchema(AnsiString FilterValue, TListBox *ListBox)
{
  int Bounds[2] = {0,3};
  OleVariant Filter = VarArrayCreate(Bounds, 1, varVariant);
  ListBox->Clear();
  Filter.PutElement(FilterValue, 3);
  TADODataSet *ADOTmp = new TADODataSet(NULL);
  try
  {
    ADOConnection1->OpenSchema(siTables, Filter, EmptyParam, ADOTmp);
    while (!ADOTmp->Eof)
    {
      if (AnsiSameText(FilterValue, ADOTmp->FieldByName("TABLE_TYPE")->AsString))
        ListBox->Items->Add(ADOTmp->FieldByName("TABLE_NAME")->AsString);
      ADOTmp->Next();
    }
  }
  __finally
  {
    delete ADOTmp;
  }
}

Тестовый проект на 6-м Билдере см. в TestMDB.zip

Это сообщение отредактировал(а) mutex - 23.6.2007, 22:30

Присоединённый файл ( Кол-во скачиваний: 24 )
 TestMDB.zip 4,54 Kb

mutex, спасибо!
Обязательно попробую.