| Новости | Поиск | FAQ | Статьи | Книги | Новости VCL | | Форумы ЧАТ | Орешник | KOL и MCK |
Форумы -» Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

	« предыдущая ветвь | форум | следующая ветвь »

Проверка на существование БД перед запуском приложения [D7, MSSQL]

Александр999 ©   (2008-10-01 12:22:00) 

Доброго времени суток.

Проблема такая. Надо проверить подключение к БД. После оператора try на строчке "ADOConnection1.Connected:=true" вываливается ошибка. Как быть?

ADOConnection1.ConnectionString:='Provider=MSDASQL.1;Persist Security Info=False;User ID=sa;Data Source=Pasport1;Initial Catalog=Pasport';
 try
  ADOConnection1.Connected:=true;
 except
  ShowMessage('Нет связи с базой данных, обратитесь к разработчику');

---

MsGuns   (2008-10-01 16:42:00) [1]

Попыткой соединения с БД нельзя проверить "существование" базы. Причиной ошибки при соединении помимо отсутствия БД может быть:

- нет сервера или он не запущен или в "офлайне"
- нет соединения с сервером (где-то в сети обрыв или "затык")
- нет сетевой карты
- неисправная сетевая карта
- поврежден сетевой провод
- нет прав на сервер
- нет прав на БД
- истекло установленное с параметрах время таймаута

---

Поросенок Винни-Пух   (2008-10-01 13:59:00) [2]

try
 ADOConnection1.Connected:=true;
except
 on E:Exception do
  begin
 ShowMessage('А чего это я вдруг решило, что Нет связи с базой данных?, и  обратитесь к разработчику');
 MessageDlg(Format('Когда на самом деле там %s',[E.Message]),mtError,[mbCancel],0);
...
end;

---

Ega23   (2008-10-01 12:31:00) [3]

А в чём предмет вопроса-то?

---

Виталий Панасенко   (2008-10-01 12:26:00) [4]

По телепортатору я так понимаю, ошибка вываливается ПРИ ОТЛАДКЕ ПРОГРАММЫ В СРЕДЕ, так?

---

Наверх