Подключаемся к БД Fireberd из 1С. Одна из первых СУБД с которой работал на заре своей ИТ карьеры.
DRIVER_ODBC_FB
DRIVER_ODBC_FB
Если ЭлементыФормы.ФайлИмпорта.Значение = "" Тогда Предупреждение("Неуказан файл"); Возврат; КонецЕсли; СтрокаПодключения = "Driver=Firebird/InterBase(r) driver;" ; СтрокаПодключения = СтрокаПодключения + "Dbname=Localhost:"+
ЭлементыФормы.ФайлИмпорта.Значение + ";"; СтрокаПодключения = СтрокаПодключения + "UID=SYSDBA;
PWD=masterkey;CHARSET=WIN1251"; // Подключаемся к базе данных Connection = Новый COMОбъект("ADODB.Connection"); Connection.ConnectionTimeout = 15; Connection.CursorLocation = 3; Connection.ConnectionString = СтрокаПодключения; Connection.Open(); Сообщить("Соединение успешно уставнолено !!!");
Пример: загрузка из бизнес пака в Бухгалтерию 3
Комментариев нет:
Отправить комментарий