Скачать: CL | DM;

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

← →
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. При загрузке программы запустать сплэш, делающий попытку подсоединиться к БД с соответсвующим комментарием и, если БД нет, автоматически запускать форму "Настройка".

---

← →
IntruderLab ©   (2006-04-27 17:02) [2]

Я обычно вот такую процедурку использую при подключении БД
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;

---

Страницы: 1 вся ветка

Скачать: CL | DM;



Память: 0.45 MB
Время: 0.024 c