Форум программистов [Powered by Invision Power Board]

Версия для печати темы
Нажмите сюда для просмотра этой темы в оригинальном формате

Форум программистов > Delphi: Базы данных и репортинг > Динамическое подключение ADO

Автор: Foley 20.5.2006, 23:46

проблема такая, мне надо динамически подключить табличку MSAccess через ADO, в АДО пишу соннекшонстринг с указанием папки допустим:

Код


var s: string;
begin
s:=extractfilepatch(paramstr(0));
ADOtable1.ConnectionString='Provider=Microsoft.Jet.OLEDB.4.0;Data Source='+s+'\Data\db.mdb;Mode=ReadWrite;Persist Security Info=False';
ADOtable1.tableName:='NT';

то выдает ошибку, мне это надо чтобы прогу можно было копировать в любой каталог (локальная)

Добавлено @ 23:46
конечно база и табличка такие имеются...

Автор: Grig 21.5.2006, 07:36

Скорей всего у тебя лишний слэш вот здесь вот:

Цитата

'+s+'\Data...

Смотри как надо:

Код


ADOTable1.ConnectionString:='Provider=Microsoft.Jet.OLEDB.4.0;Data Source='+ExtractFilePath(Application.ExeName)+'Data\db.mdb;Persist Security Info=False';
ADOTable1.TableName:='NT';
ADOTable1.Active:=true;

В таком случае неважно в какую папку пользователь скопирует проект, важно чтобы внутри папки проекта была папка Data с базой данных
Удачи!

Автор: Foley 21.5.2006, 23:08

Grig, мда... простой вопрос, а ставит в тупик... smile

Автор: ТоляМБА 22.5.2006, 05:20

4 FoleyВ следующий раз используй ShowMessage и сразу будешь видеть где грабли.

Автор: Foley 23.5.2006, 23:23

кстати слэш нужен... просто винда приглючила и после перезагрузки все компильнулось и заработало как надо, вот уж не знаю что она так...

Автор: Foley 8.6.2006, 23:05

Помогите найти ошибку:
Я пишу программу, которая использует динамическое подключение к базе данных, база данных MSAccess, способ доступа - ADO. Ничего не понимаю, вот код, при помощи которого происходит подключение к базе:

Код


var s: string;
begin
AT_rab.Active:=false;
s:=ExtractFilePath(ParamStr(0));
AT_rab.ConnectionString:='Provider=Microsoft.Jet.OLEDB.4.0;Data Source='+s+'\Data\Prikaz.mdb;Mode=ReadWrite;Persist Security Info=False';
AT_rab.TableName:='Rabot';
AT_rab.Active:=true;

на том компьютере где разрабатывалась программа она работает, подключение происходит и все нормально, но при переносе ее на другой компьютер она работать не хочет, выскакивает ошибка:
"Произошли ошибки во время выполнения многошаговой операции OLE DB. По возможности проверьте значение всех состояний OLE DB. Работа не выполнена."
Хотя все настройки вроде одинаковы на обоих компьютерах.
Проверял на других компьютерах, на них она работает нормально, но почему-то именно на этом компьютере не работает. Проверял на наличие вирусов, но их там не оказалось.
Писал программу на 2000-ом, проверял на ХР и ХР SP2, на них она работает, а на том компе на котором не идет стоит ХР SP1. Может подскажете где какие настройки можно сменить (или проверить состояния OLE DB)? Или неужели это SP1 может так влиять?

Автор: T0nic 19.6.2006, 09:46

по идее extractfilepath выдает адрес вместе с зарывающим слешем, значить слеш не нужен, по крайней мере м еня так)