VPF::ADOConnection - Форум программистов

nesfer

Дата 6.6.2009, 00:54 (ссылка)

(нет голосов)

Загрузка ...

Новичок

Профиль
Группа: Участник
Сообщений: 8
Регистрация: 21.5.2009

Репутация: нет
Всего: нет

Как осуществить проверку подключения через компонент ADOConnection ? пользователю предоставляется право выбора источника из списка (замечу этих источников там куча ) т.е. строка подключения образуется добавлением в конце источника . Ошибка возникает если источник не тот или он не существует …..как отловить или обработать данную ошибку ??7 если кто знает помогите пожалуйста !!!
Заранее большое спасибо отозвавшимся !!!!

Лапоть

Дата 6.6.2009, 10:10 (ссылка)

(нет голосов)

Загрузка ...

Бывалый

Профиль
Группа: Участник
Сообщений: 185
Регистрация: 3.4.2009

Репутация: 1
Всего: 2

Код


  try {
    ADOConnection->Open();  // попытка открыть соединение
  }
  catch (Exception &E) {
    ShowMessage(E.Message);  // ошибка - выдать сообщение и выйти!
    return;
  }
  // всё ОК, продолжить работу

Это сообщение отредактировал(а) Лапоть - 6.6.2009, 10:12

nesfer

Дата 6.6.2009, 22:46 (ссылка)

(нет голосов)

Загрузка ...

Новичок

Профиль
Группа: Участник
Сообщений: 8
Регистрация: 21.5.2009

Репутация: нет
Всего: нет

Цитата(Лапоть @ 6.6.2009, 10:10)

Код


  try {
    ADOConnection->Open();  // попытка открыть соединение
  }
  catch (Exception &E) {
    ShowMessage(E.Message);  // ошибка - выдать сообщение и выйти!
    return;
  }
  // всё ОК, продолжить работу

у меня так не работает ....выдает что то вроде
E2015 Ambiguity between 'Exception' and 'Sysutils::Exception'
E2096 lllegal structure operation
ЗЫ В чем проблема ? ответьте кто ни будь пожалуйста

Данкинг

Дата 6.6.2009, 22:55 (ссылка)

(нет голосов)

Загрузка ...

Yersinia pestis

Профиль
Группа: Завсегдатай
Сообщений: 8302
Регистрация: 7.11.2006
Где: მოსკოვი

Репутация: 11
Всего: 130

Ну сделай своё сообщение об ошибке, т.е.:

Код


try {
    ADOConnection->Open();  // попытка открыть соединение
  }
 catch  (...)
 {
    ShowMessage("Ошибка подключения к базе!!!");  // ошибка - выдать сообщение и выйти!
    return;
  }

Это сообщение отредактировал(а) Данкинг - 6.6.2009, 22:55

--------------------

There's nothing left but silent epitaphs.

nesfer

Дата 7.6.2009, 01:07 (ссылка)

(нет голосов)

Загрузка ...

Новичок

Профиль
Группа: Участник
Сообщений: 8
Регистрация: 21.5.2009

Репутация: нет
Всего: нет

Код


con="Provider=MSDASQL.1;Password=qwert;Persist Security Info=True;User ID=nesfer;Data Source=";
Edit3->Text=con+(Edit1->Text);//собираю строку и вывожу для просмотра
ADOConnection->ConnectionString=con+(Edit1->Text);
ADO1->CommandText="EXEC pass" ; // 

try   {
    ADOConnection->Open();  // попытка открыть соединение
     ADO1->Active=True; //  это dataset
       }
  catch (...) {
    ShowMessage("sdfsdf");  // ошибка - выдать сообщение и выйти!
    return;
  }

Не ловит ошибки .....ввожу в Edit1->Text (в данном случаи имя источника) просто что ни будь вылетает ошибка (если ввожу имя существующего источника все ок )

Это сообщение отредактировал(а) nesfer - 7.6.2009, 01:07

Данкинг

Дата 7.6.2009, 01:44 (ссылка)

(нет голосов)

Загрузка ...

Yersinia pestis

Профиль
Группа: Завсегдатай
Сообщений: 8302
Регистрация: 7.11.2006
Где: მოსკოვი

Репутация: 11
Всего: 130

Цитата(nesfer @ 7.6.2009, 02:07

)

Не ловит ошибки .....ввожу в Edit1->Text (в данном случаи имя источника) просто что ни будь вылетает ошибка (если ввожу имя существующего источника все ок )

И если запустить сам файл .exe - тоже не ловит?!

--------------------

There's nothing left but silent epitaphs.

nesfer

Дата 7.6.2009, 11:07 (ссылка)

(нет голосов)

Загрузка ...

Новичок

Профиль
Группа: Участник
Сообщений: 8
Регистрация: 21.5.2009

Репутация: нет
Всего: нет

Цитата(Данкинг @ 7.6.2009, 01:44)

Цитата(nesfer @ 7.6.2009, 02:07

)

И если запустить сам файл .exe - тоже не ловит?!

хм ...ловит !!!! smile

ЗЫ БОЛЬШОЕ СПАСИБО !!!!!!

Данкинг

Дата 7.6.2009, 12:01 (ссылка)

(нет голосов)

Загрузка ...

Yersinia pestis

Профиль
Группа: Завсегдатай
Сообщений: 8302
Регистрация: 7.11.2006
Где: მოსკოვი

Репутация: 11
Всего: 130

Цитата(nesfer @ 7.6.2009, 12:07

)

хм ...ловит !!!!

Отключи в дебаггере "останавливаться на ошибках". Не знаю/не помню, где это в Билдере.

Это сообщение отредактировал(а) Данкинг - 7.6.2009, 12:01

--------------------

There's nothing left but silent epitaphs.

0 Пользователей читают эту тему (0 Гостей и 0 Скрытых Пользователей)
0 Пользователей:
« Предыдущая тема \| C++ Builder \| Следующая тема »