Импорт справочников из InterBase/FireBird для 1С "Предприятие" 7.7

6 Comments

1. GSoft 26.11.2009 at 16:40

   плюс ставлю авансом, сейчас не посмотреть, но пару лет назад была такая задача, тогда бы пригодилась на все 100%

   Reply ↓
2. spectator 03.12.2009 at 17:22

   Полезная вещь. 🙂

   Reply ↓
3. phill75 03.12.2009 at 19:07

   еще бы драйвер ODBC для InterBase

   Reply ↓
4. wing 10.12.2009 at 05:47

   (0) ГДБ=СоздатьОбъект(«ADODB.Connection»);
   
   Неудачная попытка создания объекта (ADODB.Connection) — что нужно, чтобы это работало?

   я к FireBird обращаюсь так (функция класса FireBird):
   

   Функция Открыть() Экспорт
   Закрыть();
   БД = СоздатьОбъект(«OLEDBData»);
   Соединение = «DRIVER=Firebird/InterBase® driver; DBNAME=» + Сервер + «:» + ИмяБД + «; UID=» + ПользовательБД + «; PWD=» + Пароль + «;»;
   Попытка
   БД.Соединение(Соединение);
   Команда = БД.СоздатьКоманду();
   Команда.Отладка(Отладка);
   ОткрытаБД = 1;
   Исключение
   ОткрытаБД = 0;
   Модуль = СоздатьОбъект(«ВыполняемыйМодуль»);
   ТекстОшибки = «Ошибка соединения с FireBird БД » + ИмяБД + «: » + ОписаниеОшибки();
   //#exinfo
   Модуль.ВыброситьИскл(, ТекстОшибки);
   КонецПопытки;
   Возврат ОткрытаБД;
   КонецФункции // Открыть
   

   Показать

   Reply ↓
5. Aleksey_3 07.03.2010 at 21:22

   Что то не взлетело с первого раза.

   Баг1
   
   При Открытии пишет
   
   КонецЕсли<<?>>
   
   {D:IMPORTFIREBIRD.ERT(156)}: Пропущен символ ‘;’

   Баг2
   
   Непонятный косяк с радиокнопкой ВыбранаБаза.
   
   ПриОткрытии она не проставляется, при изменении не вызывается процедура ПриВыбореБазы, только если выбор через Enter. При этом значение
   
   ВыбранаБаза равно -1 (минус 1 ?) и 0

   Лечиться проставлением галкой первый в группе

   Баг3
   
   Не меняется заголовок текста Импорт справочников из …

   Лечиться
   
   Дописать в конце процедуры ПриВыбореБазы
   
   Форма.Заголовок.Заголовок(Заголовок);

   Фича1
   
   Предупреждение(«Невозможно установить соединение с базой данных!»);
   
   Вряд ли можно назвать информативным, желательно добавить

   Сообщить(«»+ОписаниеОшибки());

   Reply ↓
6. knigula 13.12.2011 at 20:18

   Спасибо. Показательно, как пример работы с Firebird.
   
   Но не работает с blob полями. Хотелось бы и это увидеть.

   Reply ↓