OraCon - внешняя компонента для 1С, предназначенная для выполнения прямых запросов к Oracle
--------------------------------------------------------------------------
0. Установка
- Запустить setup.exe
- После установки зайти в \Program Files\OraCon\ и запустить reg.bat для регистрации компоненты.
Прим. Компонента регистрируется в реестре и ее не надо КОПИРОВАТЬ в папку с 1С и.т.д.
Системные требования.
- необходим Net Framework 2
- необходим установленный OracleClient (тестировалось на версии клиента 10g, если с Вашим клиентом не заработает - в \Program Files\OraCon\ есть dll от клиента 10g)
---------------------------------------------------------------------------
1. Подключение компоненты (глобальный модуль 1С)
Перем ora Экспорт;
Процедура ПриНачалеРаботыСистемы()
...
// Работа с Ораклом
ИмяВК = "AddIn.OraCon";
ок = ПодключитьВнешнююКомпоненту(ИмяВК);
Если ок=0 Тогда
Сообщить("Не удалось подключить внешнюю компоненту");
Иначе
ora = СоздатьОбъект(ИмяВК);
КонецЕсли;
...
КонецПроцедуры
------------------------------------------------------------------------
2. Использование компоненты.
ora.Открыть();// открытие соединения с ораклом.
// данный метод использует параметры соединения которые можно задать
// на вкладке Сервис - параметры - Параметры соединения с БД.
-----------------------------------------------------------------
// выполнение запроса, который возвращает множество строк.
ora.ЗапросСтр("select id,name from aaa");
Пока ora.Читать() = 1 Цикл // получение строки
Сообщить("" + ora.Элем("id") + " " + ora.Элем("name"));
// получение элемента строки ora.Элем("id") по наименованию
// получение элемента строки ora.Элем(0) по номеру
КонецЦикла;
-------------------------------------------------------------------
// получение единичного (скалярного) значения
зн = ora.ЗапросЗн("select count(*) from aaa");
--------------------------------------------------------------------
// выполнение запроса не возвращающего значения
Если ora.Запрос("insert into aaa(id,name) values(1,'xxx')") = 1 Тогда
// данные записаны
КонецЕсли;
--------------------------------------------------------------------
// закрытие соединения
ora.Закрыть();
----------------------------------------------------------------------------
Разработчик: Выхрыстюк Алексей (it.net). poshta.it@gmail.com
