Путь к БД !

← →
Ded22 (2006-04-27 13:20) [0]

День Добрый.
Связываюсь c БД Access через ADOConnection.
все нормально.
кинул на форму кнопку "Подключиться к базе" по которой написал код
begin DataModule.ADOConnection1.Close; if EditConnectionString(DataModule.ADOConnection1) then begin DataModule.ADOConnection1.Connected:=true; DataModule.ADOTable.Active:=true;
но если перенести Базу на другой диск то при запуске вылетает куча ошибок ! типа Поле такое то не найдено.жму Ок ок ок ок ок ок.
подключаюсь через кнопку и все работает.
вопрос - как исправить эти ошибки?
если я ADOConnect не привязываю к орпеделенной базе то при запуске выскакивает ошибка - НЕ ВЫПОЛНЕННА ПРОВЕРКА ПОДЛИННОСТИ !
что с этим делать?

← →
MsGuns © (2006-04-27 14:33) [1]

1. В дизайне не должно быть открытых датасетов и, естественно, коннектов.
2. Для настройки на нужный путь в БД использовать одно из :
- инифайл, куда программа записывает указанный юзером путь к БД через меню "Настройка"
- источник данных ODBC
- udl-файл при доступе через OLEDB
3. При загрузке программы запустать сплэш, делающий попытку подсоединиться к БД с соответсвующим комментарием и, если БД нет, автоматически запускать форму "Настройка".

Я обычно вот такую процедурку использую при подключении БД
procedure DBConnect;
begin
if frmMain.sDBSettings <> "" then
begin
frmMain.adoc := TADOConnection.Create(Application);
frmMain.adoc.Connected := False;
frmMain.adoc.LoginPrompt := False;
frmMain.adoc.ConnectionString := frmMain.sDBSettings;
frmMain.adoc.Connected := True;
try
//некие действия
except end;
end
else begin
frmMain.sDBSettings := PromptDataSource(Application.Handle,"");
DBConnect;
end;
end;

Путь к БД ! Найти похожие ветки