[id2014]

Прошу помочь с чтением информации из баз данных Pervasive.

Использую Delphi 7
Базы данных работают под управлением Pervasive SQL 2000i SP4.
Каждая база данных состоит из двух файлов:
<имя базы>.dt - размер до 10 Кб.
<имя базы>.btv - размер от 50 до 700 Мб.

Нужно из программы Delphi считывать из базы данных заданные поля.
И нужно чтобы программа запускалась на компьютерах, на которых не установлены Pervasive и BDE.

У меня так получилось сделать для баз данных .dbf используя компоненты ADOConnection, ADOTable и DataSource как описано во второй части этого примера
http://gkb29asu.ucoz.ru/publ/program...delphi/9-1-0-9

Можно ли таким способом получить доступ к базам данных Pervasive?
Если можно, подскажите что нужно написать в свойстве ADOConnection.ConnectionString и как настроить другие компоненты?

[Uniq!]

Вам нужен ODBC драйвер для вашей БД под вашу ОС (это обязательная опция для всех клиентских машин)
Его можно, я думаю, найти на офф сайте.

Дальше как с любым другим провайдером нужно создать строку прям из IDE D7

[id2014]

Вот рабочий код для Dbf файлов.
Можно ли сделать так же для Pervasive? Что нужно поменять?

Код:

procedure TForm1.Button1Click(Sender: TObject);
var	AppFolderPath	: string;
begin
// подключаемся к ДБФ и выводим данные в таблицу
     AppFolderPath := copy(ExtractFilePath(Application.ExeName),1,length(ExtractFilePath(Application.ExeName))-1);

     ADOTable1.Active:=false;
     ADOConnection1.Connected:=false;

     ADOConnection1.ConnectionString:='Provider=Microsoft.Jet.OLEDB.4.0;Data Source="' +AppFolderPath + '";Extended Properties="DBASE IV;";"';

     ADOConnection1.LoginPrompt:=false;
     ADOConnection1.Mode:=cmReadWrite;
     ADOConnection1.Connected:=true;

// err.dbf находится в папке AppFolderPath (в данном случае в папке с программой)
     ADOTable1.TableName:='err';
     ADOTable1.Active:=true;

// Подключение выполнено

end;

Админ: Пользуемся тегами для оформления кода!

[Uniq!]

А код тут не при делах. Надо установить драйвер с сайта производителя и собрать CString как я написал выше.

[Страдалецъ]

И нужно чтобы программа запускалась на компьютерах, на которых не установлены Pervasive и BDE.

Совсем ничего не устанавливая не выйдет. Для получения доступа клиента к серверу вам надо установить PDAC, который имеется на сайте производителеля.

[id2014]

На компьютере установлен Pervasive SQL 2000i SP4.
Базы данных на этом компьютере открываются другой программой.
Мне нужно чтобы я со своей программы мог получить доступ к базам для чтения.

В Delphi 7 есть Pervasive PSQL OLE DB Provider.
Мне этого достаточно? Или нужно ещё что-то скачивать?
Помогите пожалуйста с подключением к базе данных или дайте ссылку где обсуждается подключение к базам данных Pervasive.

[Freeman]

Сообщение от id2014

Помогите пожалуйста с подключением к базе данных или дайте ссылку где обсуждается подключение к базам данных Pervasive.

Провайдера OLE DB должно быть достаточно. Подключайся через ADO. Как правильно формировать строку подключения, смотри в справке к Pervasive.