Ошибка v83.Application
Здравствуйте.
При попытке подключения к ИБ:
Возникает APPCRASH
Сигнатура проблемы:
Имя события проблемы: APPCRASH
Имя приложения: 1cv8.exe
Версия приложения: 8.3.13.1809
Отметка времени приложения: 5c6f4b2b
Имя модуля с ошибкой: edb.dll
Версия модуля с ошибкой: 8.3.13.1809
Отметка времени модуля с ошибкой: 5c6f4f23
Код исключения: c0000005
Смещение исключения: 00083246
Версия ОС: 6.3.9600.2.0.0.16.7
Код языка: 1049
Дополнительные сведения 1: 5861
Дополнительные сведения 2: 5861822e1919d7c014bbb064c64908b2
Дополнительные сведения 3: fdca
Дополнительные сведения 4: fdca1fbcc5199d38e99bdacef751acf6
Помогите пожалуйста. Может кто сталкивался..
При попытке подключения к ИБ:
Функция ПодключитьсяКбазе() ЭКСПОРТ
Подключение = Новый COMОбъект("V83.Application");
СтрокаПодключения = "Srvr=""****"";Ref=""****"";Usr=""****"";Pwd=""****"";";
Попытка
База = Подключение.Connect(СтрокаПодключения);
Сообщить("Подключение к ИБ выполнено..",СтатусСообщения.Информация);
Возврат Подключение.Connect(СтрокаПодключения);
Исключение
Сообщить(ОписаниеОшибки());
Сообщить("Ошибка подключения к базе данных!!",СтатусСообщения.Важное);
Возврат Неопределено;
КонецПопытки;
КонецФункции
ПоказатьВозникает APPCRASH
Сигнатура проблемы:
Имя события проблемы: APPCRASH
Имя приложения: 1cv8.exe
Версия приложения: 8.3.13.1809
Отметка времени приложения: 5c6f4b2b
Имя модуля с ошибкой: edb.dll
Версия модуля с ошибкой: 8.3.13.1809
Отметка времени модуля с ошибкой: 5c6f4f23
Код исключения: c0000005
Смещение исключения: 00083246
Версия ОС: 6.3.9600.2.0.0.16.7
Код языка: 1049
Дополнительные сведения 1: 5861
Дополнительные сведения 2: 5861822e1919d7c014bbb064c64908b2
Дополнительные сведения 3: fdca
Дополнительные сведения 4: fdca1fbcc5199d38e99bdacef751acf6
Помогите пожалуйста. Может кто сталкивался..
По теме из базы знаний
- Взаимодействие между базами 1С через COM
- Знакомство с технологией Automation-сервер на примерах
- WS Black Hole by EvilGrym. Универсальный обмен через SOAP, вместо прямого соединения через COM, V83.Application и т.п.
- Настройка регламентных заданий с использованием bat-файлов или vbs-скриптов через механизм Task Scheduler Windows
- Обработчик ожидания. Нюансы
Ответы
В избранное
Подписаться на ответы
Сортировка:
Древо развёрнутое
Свернуть все
(1) почистить кеш. перезапустить агента.
Убрать дублирование и проверить еще раз.
Проверить зарегистрирован ли объект под вашей версией. Попробовать на другом ПК.
Ну а дальше по ходу действовать.
Ну и радикальный совет отказаться от кома в сторону веб или ашттп сервисов.
Убрать дублирование и проверить еще раз.
Проверить зарегистрирован ли объект под вашей версией. Попробовать на другом ПК.
Ну а дальше по ходу действовать.
Ну и радикальный совет отказаться от кома в сторону веб или ашттп сервисов.
База = Новый COMObject("V83.Application");
Подключено=Истина;
Попытка
Если ЭлементыФормы.Панель2.ТекущаяСтраница.Заголовок="Файловая версия" Тогда
Подключено = База.Connect("File="""+СокрЛП(ПутьКбазе)+""";Usr="""+СокрЛП(Пользователь)+""";Pwd = """ + СокрЛП(Пароль) + """;");
Иначе
Подключено = База.Connect("Srvr="""+СокрЛП(ИмяСервера)+""";Ref="""+СокрЛП(ИмяБазы)+""";Usr="""+СокрЛП(Пользователь)+""";Pwd = """ + СокрЛП(Пароль) + """;");
КонецЕсли;
ЭлементыФормы.Проверка.Значение = "Подключено";
Исключение
Предупреждение(ОписаниеОшибки());
Подключено=Ложь;
КонецПопытки;
Возврат Подключено;
Показать
V83.Application требуется, если нужно создавать, изменять объекты в базе.
Функция ИБОткрыть(ИБ,ССообщениями=Истина,Коннектор=Истина) Экспорт
Попытка
Если Коннектор Тогда
Соединение=Новый COMОбъект("V83.COMConnector");
Иначе
Соединение=Новый COMОбъект("V83.Application");
КонецЕсли;
Srvr=ИБ.КластерСерверов;
Ref=ИБ.ИмяИнформационнойБазы;
Пользователь=ИБ.Пользователь;
Пароль=ИБ.Пароль;
База=Соединение.Connect("Srvr="""+Srvr+""";Ref="""+Ref+""";Usr="""+Пользователь+""";Pwd="""+Пароль+""";");
Если Не Коннектор Тогда
База=Соединение;
КонецЕсли;
Исключение
Если ССообщениями Тогда
Сообщить("Ошибка подключения к информационной базе """+ИБ+""". "+ОписаниеОшибки());
КонецЕсли;
База=Неопределено;
КонецПопытки;
Возврат База;
КонецФункции
Показать
(9) Вот так цепляюсь к базе розницы из БП
db = Новый COMобъект(ОбщегоНазначенияКлиентСервер.ИмяCOMСоединителя());
Если СерверноеПодключение Тогда
База = db.Connect("Srvr="""+ИмяСервера+"""; Ref="""+Имябазы+"""; Usr="""+Пользователь+""";Pwd="""+Пароль+""";");
Иначе
База = db.Connect("File="""+ПутьКБазе+""";Usr="""+Пользователь+""";Pwd="""+Пароль+""";");
КонецЕсли;
Создаю документ оплаты
//... Тут запрос
ДокОплаты=База .Документы.РегистрацияБезналичнойОплаты.СоздатьДокумент();
ДокОплаты.Заполнить(НайтиЗаказПокупателя(Стр.ЗаказПокупателя,Обработка));
ДокОплаты.Дата=ТекущаяДата();
Если ДокОплаты.РасшифровкаПлатежа.Количество()>0 Тогда
ДокОплаты.РасшифровкаПлатежа.Получить(0).СтатьяДвиженияДенежныхСредств=База.Справочники.СтатьиДвиженияДенежныхСредств.НайтиПоКоду("00-000015");
КонецЕсли;
Если ЗначениеЗаполнено(Стр.РН) Тогда
ДокОплаты.РасшифровкаПлатежа.Получить(0).ДокументРасчетовСКонтрагентом=НайтиРН(Стр.РН,Обработка);
КонецЕсли;
ДокОплаты.Записать(База .РежимЗаписиДокумента.Проведение);
Показать