0
Простенький вопросик
25.10.19
✎
08:46
|
Есть код теста подключения
&НаСервере
Процедура ПроверитьПодключениеНаСервере()
// Формируем строку подключения
ConnectSmarket = Новый COMОбъект("ADODB.Connection");
ConnectSmarket.ConnectionString = "Driver=Firebird/InterBase(r) driver;" +
"Dbname=" + ПутьКБазеДанных + ";" +
"UID=" + Логин + ";" +
"PWD=" + Пароль + ";" +
"CHARSET=" + Кодировка + ";" +
"clientC:" + ПутьКDLL + ";";
ConnectSmarket.ConnectionTimeout = Таймаут;
ConnectSmarket.CursorLocation = CursorLocation;
// Подключаемся к базе данных
Попытка
ConnectSmarket.Open(ConnectSmarket.ConnectionString);
Исключение
ОбщегоНазначенияКлиентСервер.СообщитьПользователю("Не удалось выполнить подключение " + ОписаниеОшибки(),);
Возврат;
КонецПопытки;
ОбщегоНазначенияКлиентСервер.СообщитьПользователю("Подключение успешно выполнено" + ОписаниеОшибки());
ConnectSmarket.Close();
КонецПроцедуры
Код выдает ошибку в попытке
Не удалось выполнить подключение {ВнешняяОбработка.Обмен1сSmarket_ВнешняяОбработка.Форма.Форма.Форма(54)}: Ошибка при вызове метода контекста (Open): Произошла исключительная ситуация (Microsoft OLE DB Provider for ODBC Drivers): [Microsoft][Диспетчер драйверов ODBC] Источник данных не найден и не указан драйвер, используемый по умолчанию
Что можно с этим сделать?
|
|