| Форумы
ЧАТ |
Орешник |
|
| Форумы -» | Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG |
|
| ||
|
|
Новости |
Поиск |
FAQ |
Статьи |
Книги |
Новости VCL
| | Форумы ЧАТ |
Орешник |
|
| |||
| |||
| |||
« предыдущая ветвь | форум | следующая ветвь »
ADO & API [D3, Win95/98]
Cosmic © (2002-11-30 13:22:00)Как без VCL получить доступ к базе *.MDB ??? И чего-нибудь оттуда прочитать ???
asmith (2002-12-01 16:25:00) [1]Сидя в Delphi в меню Project\Import Type Library, выскочит диалог, выбери в списке Microsoft ActiveX Data Objects 2.x Library (бери последнюю версию, если их несколько), далее OK или Create Unit (уже не помнб как это было в D3), сгенерится PAS-файл, его включи в проект и сошлись на него оператором uses. Все.
Желательно обновить ADO, если у тебя лишь базовая поставка из Win95/98.
Cosmic (2002-11-30 21:21:00) [2]Нескромный вопрос: а что значит "Импортируй библиотеку типов ADO, сошлись на нее"?. Как это сделать?
asmith (2002-11-30 18:04:00) [3]Импортируй библиотеку типов ADO, сошлись на нее и делай так:
var
aConnection : Connection;
Data : Recordset;
szConnection : string;
szQueryString : string;
...
szConnection := "bla-bla-bla";
aConnection := CoConnection.Create();
OleVariant(aConnection).Open(szConnection);
Data := CoRecordset.Create();
Data.Set_ActiveConnection(aConnection);
Data.CursorLocation := adUseClient;
szQueryString := "select * from MyTable"
Data.Open(szQueryString, szConnection, adOpenKeyset, adLockBatchOptimistic, adCmdText);
// use data fetched here
Data.Close();
Можно не использовать ранне связывание, тогда используй OleVariant, пиши CreateOleObject вместо CoConnection.Create и пр.
| |
