Доброго времени суток, господа-форумчане.
Вопрос такой: Имеется сервак с GESTORI, (сам я сколько себя помню работал только с файловой системой бд). Если запускать обработку с сервера, то

ТипБазы = "SQL";
База = СоздатьОбъект("ODBCDataBase");
База.ПрисоединенныеИБ(ПутьКБазе, "Админ", "ХитрыйПароль");

работает нормально, однако на локальном компе естественно соединение не подымается (да и откуда бы).

Откопал вот такую статейку, и прошу помощи в разборе...

DB = СоздатьОбъект("ODBCDatabase");
DB.Соединение("DRIVER={MySQL ODBC 5.1 Driver}; SERVER=IP_Супер_мега_сервера; DATABASE=Мега_база; USER=Супер_юзер; PASSWORD=пароль_супер_мега_юзера; OPTION=3;");
RS = СоздатьОбъект("ODBCRecordSet");
RS.SetDatabase(DB);
Если RS.Выполнить("set names cp1251") = 0 Тогда
Сообщить("Ошибка подключения к MySQL" + РазделительСтрок + RS.ПолучитьОписаниеОшибки());
СтатусВозврата(0);
Возврат;
КонецЕсли;

В моем случае драйвер если правильно понимаю вот так
http://savepic.su/3565362.png

да и вообще, господа подскажите кто как устанавливал соединение с БД от Gestori ?

и что за Option=3

в DB.Соединение("DRIVER={MySQL ODBC 5.1 Driver}; SERVER=IP_Супер_мега_сервера; DATABASE=Мега_база; USER=Супер_юзер; PASSWORD=пароль_супер_мега_юзера; OPTION=3;");

сумбурно...
Итак, имеется сервак с GESTORI. Имеется 1Ска. База в скуле.
обмен с Джестри всегда шел через XMl, сейчас есть необходимость прямого чтения из БД GESTORI в 1С.

пытаюсь поднять ODBC соединение из 1Ски напрямую считывать инфу из базы Джестори

на всякий случай, ПрисоединенныеИБ имеет смысл только в отношение одинесной информационной базы

окей, а вот эту константу откуд брать ?
DRIVER={MySQL ODBC 5.1 Driver};

и что за опшн = 3 ?

вот такая шляпа не взлетает(( не может установитьсоединение
где я мог ошибиться?

Процедура ПодключитсяКБазе1С()
    Попытка
        ЗагрузитьВнешнююКомпоненту("1cpp.dll");
        Сообщить("Компонента 1С++ загружена!");
    Исключение
        Сообщить("Пытались, но не загрузили компоненту 1С++ :(");
    КонецПопытки;

    Если ФС.СуществуетФайл(ПутьКБазе + "1Cv7.DD") = 1 Тогда
          ТипБазы = "DBF";
          База = СоздатьОбъект("OLEDBData");
        База.ПрисоединитьИБ(ПутьКБазе);  
      Иначе
          ТипБазы = "SQL";
        База = СоздатьОбъект("ODBCDatabase");
        База.Соединение("DRIVER={OpenLink Lite for Progress 9.1b (Large Client)(32 Bit)}; SERVER=10.1.11.247; DATABASE=ges3; USER=admin; PASSWORD=nt[ybxtcrfz; OPTION=3;");
           Попытка
            Если База.Соединение.Открыта() Тогда
                Сообщить("база подключена!!!");
            КонецЕсли;
        Исключение
            Сообщить("Не могу подключиться к базе!!!");
        КонецПопытки;
      КонецЕсли;
КонецПроцедуры

какая то каша..

тут и мускул на кой то привёл и присоединить ИБ ?...

Твоя гестори на чем хоть ?

для начала нужно установить драйвер
http://dev.mysql.com/downloads/connector/odbc/
потом, хотя бы, бегло ознакомится с докой
http://dev.mysql.com/doc/refman/5.6/en/connector-odbc.html

тут можно подсмотреть, наверно, все возможные строки подключения практически к любым источникам данных
http://www.connectionstrings.com/
в частности к MySql http://www.connectionstrings.com/mysql/
b конкретно к ODBC 5.1 http://www.connectionstrings.com/mysql-connector-odbc-5-1/

"опшн = 3" вроде бы это призывает драйвер к "чистому" чтению

(9) а есть уверенность, что база в мускуле ?...

А не на прогрессе, каком нить ?

(10) нет уверенности

порылся. и да. база на прогрессе

копаю дальше

(13) круто, а нафига тогда ты строку от мускула приплетаешь ?

Создай пустой udl файлик - через него слепишь строку подключения, предварительно установив какой-нить драйвер для твоего прогресса (ежели его нема в системе).
Усё.

не... про мускул там просто из дефолтного примера кусок привел...
потому и спрашивал где брать константу драйвера
DRIVER={MySQL ODBC 5.1 Driver};

если в моем случае это не мускул, а прогресс

см (15)  - это самое простое
или ходи на коннэкшионстрингс точка ком

http://www.connectionstrings.com/progress/

хотя проще - udl

был. хороший сайт.
DSN = ?

см (15)

почти взлетело
http://savepic.su/3593915.png

у тебя через udl файлик проходит хоть тест подключения к базе ?

1) ситуация на картинке - это средствами 1Ски:
База = СоздатьОбъект("ODBCDatabase");
База.Соединение("DSN=ges3;HOST=10.1.11.247;DB=ges3;UID=******;PWD=***********;PORT=2517;");

2) вариант 1 пока забросил, и делаю через udl.
будет работать вариант 2, попробую поднять и вариант 1.

3) да, тест проходит.

далее полагаю через 1Ску формировать что-то наподобие

Connect = Новый COMОбъект("ADODB.Connection");
Connect.ConnectionString = "File Name="+Файл;
Connect.Open();

только как оно в 7ке делается пока разбираюсь

(25) нафига тебе ado ?
:))
Хочешь выборку ручонками перебирать ?
:)

(24) если тест проходит, открой udl файлик блокнотом и увидишь свою правильную строку подключения.. скармливай её 1с-ине и наслаждайся.

База.Соединение("строка_из_udl");

В отладчике пишет База.Соединение("строка_из_udl")=0
=(

Код покажешь, или гадать будем ?

стоооп... меня вот что смущает
удл-файл:

[oledb]
; Everything after this line is an OLE DB initstring
Provider=MSDASQL.1;Password=12345;Persist Security Info=True;User ID=admin;Data Source=ges3

oledb ? втф

http://savepic.su/3604170.png

ODBС там только один... искать прогрессовский ?

а кода там...

Процедура ПодключитсяКБазе1С()
    Если ФС.СуществуетФайл(ПутьКБазе + "1Cv7.DD") = 1 Тогда
          ТипБазы = "DBF";
          База = СоздатьОбъект("OLEDBData");
        База.ПрисоединитьИБ(ПутьКБазе);  
    Иначе
          ТипБазы = "SQL";
        База = СоздатьОбъект("ODBCDatabase");
        База.Соединение("Provider=MSDASQL.1;Password=12345;Persist Security Info=True;User ID=admin;Data Source=ges3");
      КонецЕсли;
КонецПроцедуры

...п..ц

(

Итак, по шагам.
1) при открытии обработки

Попытка
        ЗагрузитьВнешнююКомпоненту("1cpp.dll");
        Сообщить("Компонента 1С++ загружена!");
    Исключение
        Сообщить("Пытались, но не загрузили компоненту 1С++ :(");
    КонецПопытки;


2)Далее подключается

Процедура ПодключитсяКБазе1С()
    Если ФС.СуществуетФайл(ПутьКБазе + "1Cv7.DD") = 1 Тогда
          ТипБазы = "DBF";
          База = СоздатьОбъект("OLEDBData");
        База.ПрисоединитьИБ(ПутьКБазе);  
    Иначе
          ТипБазы = "SQL";
        База = СоздатьОбъект("ODBCDatabase");
        База.Соединение("Provider=MSDASQL.1;Password=nt[ybxtcrfz;Persist Security Info=True;User ID=admin;Data Source=ges3");
        
    КонецЕсли;
КонецПроцедуры

3) И по клику на баттон

Процедура ИмпортироватьДокумент(ДатаДок)
    //Если БазаОткрыта = 1 Тогда
        RS = СоздатьОбъект("ODBCRecordSet");
        RS.SetDatabase(База);
        RS.УстБД1С();
        ТекстЗапроса = "
            |SELECT
            |    T1.num_nakl,
            |    T1.dt_nakl,
            |    T1.cod_shop,
            |    T1.cod_firm,
            |    T3.address[1],
            |    T1.num_doc,
            |    T1.dt_doc,
            |    T2.Size
            |FROM pr1 T1, pr3 T2, firms T3  
            |WHERE
            |     T1.dt_nakl = &ДатаВходНакл
            |AND    T1.num_nakl = T2.num_nakl
            |AND    T2.cod_nalog = 6
            |AND    T2.Size > 0
            |AND    T1.cod_firm = T3.cod_firm
                |";    
        RS.УстановитьТекстовыйПараметр("ДатаВходНакл", ДатаДок);    
        ТЗ = RS.ВыполнитьИнструкцию(ТекстЗапроса);
        ТЗ.ВыбратьСтроки();

whatamdoingwrong?

http://www.datadirect.com/support/product-documentation/downloads

отседыва скачай нужного провайдера

Ёпрст, я не исключаю наитупейших ошибок в коде((
7ку вижу в глаза только 2й день...(

(36)
не устбд1с, а УстБД

RS = СоздатьОбъект("ODBCRecordSet");
        RS.SetDatabase(База);
//        RS.УстБД1С();

вот так, для начала

поставил... и понял что драйвер действительно уже стоит.
Через "Администратор источников ODBC" видно что он есть
http://savepic.su/3604166.png
однако Среди поставщиков ничего не изменилось...
http://savepic.su/3604170.png

мозг уже закипает, однако я заставлю её полететь.

причем вот с этим удл-ом

[oledb]
; Everything after this line is an OLE DB initstring
Provider=MSDASQL.1;Password=nt[ybxtcrfz;Persist Security Info=True;User ID=admin;Data Source=ges3

проверка проходит успешно.

однако шифт+ф9 возвращает, что соединение = 0

База.Соединение("Provider=MSDASQL.1;Password=nt[ybxtcrfz;Persist Security Info=True;User ID=admin;Data Source=ges3")= 0

соответственно последующий запрос уходит в пустоту.

А так ?

ОлеДБ = СоздатьОбъект("OLEDBData");
Соединение = "Provider=MSDASQL.1;Password=nt[ybxtcrfz;Persist Security Info=True;User ID=admin;Data Source=ges3";
Рез = ОлеДБ.Соединение(Соединение);
Сообщить(рез);

DBInitialize::Initialize(): [OpenLink][ODBC]Unable to allocate server handle

http://wikis.openlinksw.com/dataspace/owiki/wiki/UdaWikiWeb/UnableToAllocateServerHandle#Progress with Single-Tier "Lite" Edition Drivers

изучаю

Progress with Single-Tier "Lite" Edition Drivers
Первый же пункт кажется уже идет лесом, ибо (по словам админа) не в сокет режиме((

1) Ensure that your Progress database is running in sockets mode.

и все таки, господа...
обходил ли кто "DBInitialize::Initialize(): [OpenLink][ODBC]Unable to allocate server handle"

или же это упирается в перенастройку сервера?