Проблема при соединении через Com

Форум Программирование Общие вопросы программирования (Dev)

Платформа 1С v8.3

1. ritd 10.10.12 16:58 Сейчас в теме

Нужно соединиться из базы 8.1 к 8.2 по Com

СтрокаПодключения = "srvr='" + Сервер + "'; ref='" + БазаДанных + "'; usr='" + Пользователь + "'; pwd='" + Пароль + "';";
БП = Новый COMОбъект("V82.COMConnector");
Попытка
Соединение = БП.Connect(СтрокаПодключения);
Состояние("Успешное подключение к базе!")
Исключение
Предупреждение("Не удалось подключится а БД! " +ОписаниеОшибки());
Возврат;
КонецПопытки;

Возникает исключение "Различаются версии клиента и сервера (8.2.12 и 8.2.16) " Можно ли как-то указать, какую версию использовать?

По теме из базы знаний

Ответы

Подписаться на ответы Инфостарт бот

Свернуть все

2. DenisCh 10.10.12 17:11 Сейчас в теме

штатно - нет

3. ritd 10.10.12 17:40 Сейчас в теме

а вообще как-нибудь, что бы не навредить?

4. Farruhwhite2006 11.10.12 15:41 Сейчас в теме

Есть один вариант, не блестяще, конечно. Но если "позарез" нужно работающее решение, можно попробовать.
В строке

БП = Новый COMОбъект("V82.COMConnector");

вы создаете экземпляр 1с V82 той версии, которая установлена на вашем компьютере.
Думаю можно найти комп на котором установлена версия 1с 82 именно та, которая нужна.
Вот с него и запускать обработку с 1с 8.1. А 1с сам по сети найдет нужный сервер.

5. kilokilo 18 11.10.12 17:09 Сейчас в теме

положи в текстовый файл с расширением vbs и запусти сначала вот это:

Dim objShell
        Dim FolderPath1C ' Путь до папки 1С
        Dim IsReliz ' Номер релиза 1С

        FolderPath1C = "C:\Program Files (x86)\1cv82\" ' Путь до папки 1С
        IsReliz = "8.2.16.368" ' Номер релиза 1С

        On Error Resume Next 'GoTo ErrHand 
        Set objShell = WScript.CreateObject("WScript.Shell")
            objShell.Run("regsvr32 """ + FolderPath1C + IsReliz + "\bin\comcntr.dll"""), 1, True
        If Err = 0 Then 
            Exit Sub
        Else
            MyTrace "Необходимо вручную зарегистрировать компоненту:" & chr(13) &"regsvr32 ""C:\Program Files (x86)\1cv82\" + IsReliz + "\bin\comcntr.dll""" 
        End If

Показать

6. kilokilo 18 11.10.12 17:13 Сейчас в теме

Или вообще в командной строке из под администратора запусти это:

regsvr32 "C:\Program Files (x86)\1cv82\8.2.16.368\bin\comcntr.dll"

Оставьте свое сообщение

E-mail: