Запуск процедур 1С из Access / Microsoft Access

ReSQL.ru

Мобильная версия Контакт Правила FAQ Помощь

Гость

Войти | Регистрация | Профиль | Очистить

Новые сообщения | Избранное

Форумы | Пользователи | Статистика | Мод. лог | Поиск

Цитировать

Написать

Автор*:

Ввести пароль для входа

Тема*:

Сообщение

Данное сообщение тематическое

Сообщение содержит картинки или видео 18+

Автор:

ВНИМАНИЕ! На данном подфоруме действуют строгие правила. Удостоверьтесь, что ваше сообщение соответствует им!

Форум или тема закрыты для гостей. Необходима авторизация!

Загрузить последнюю сохраненную версию

Вложение:

Вставить как галерею

Максимальный размер вложений: 4,0 МБ, аудио/видео: 8,0 МБ. Картинки большего размера ужимаются, если возможно.

Введите код, изображенный на картинке. Если код нечитаемый, кликните картинку, чтобы загрузить другой вариант.

Отправляя сообщение, я выражаю свое согласие с правилами форума и принимаю пользовательское соглашение.

Доб. в избранное | Игнор. тему | Прикреп. тему | Пометить прочит. / непрочит. | Фильтр

Форумы / Microsoft Access [игнор отключен] [закрыт для гостей] / Запуск процедур 1С из Access

3 сообщений из 3, страница 1 из 1

Запуск процедур 1С из Access

#39150246

Alex40na40

Гость

Доброе утро, ребят
Сложно угадать: относится ли эта тема к 1С или к Аксесс. Т.к. я думаю, что ошибся где-то в Аксесс, напишу сюда.

Задача состоит в том, чтобы подключиться к 1С серверным способом и из аксесс вызвать процедуру в 1С с передачей в нее данных.

Я создал базу в 1С, как полагается (я так думаю) :)
При запуске аксесс происходит подключение к Базе в 1С: (ниже код)

Код: vbnet

1.
2.
3.
4.
5.

Public v8 As Object
Public Connect As Object
Set v8 = CreateObject("V83.COMConnector")
Set Connect = v8.Connect("Srvr=""server"";Ref=""1C-2016"";Usr=""Автозагрузка"";Pwd=""******""")
MsgBox ("Подключился")

То, что соединение есть свидетельствует запись в 1Сv8 servers, что есть СОМ-соединение.

Далее в аксесс вызываю

Код: vbnet

1.
2.
3.
4.
5.

If [Статус] <> "Предварительная заявка" Then
   Set Ydogs = CurrentDb.OpenRecordset("select * from GP where [ДоговорПолный]='Y123'", dbOpenDynaset)
   Rez = Connect.ДоработкиКлиентСервер.СоздатьРеализацию("" & Ydogs![ИД] & "", 0, "" & Ydogs![ДоговорПолный] & "") // урезал код, т.к. просто передается список данных.
   MsgBox "Успешно."
End If

В 1С стоит "останова" (см. вложение) и при вызове данной процедуры был бы стоп... но его не происходит, просто выходит сообщение в аксесс "Успешно".

Подскажите пжлст, где я недоглядел чего. Спасибо.

...

Рейтинг:

0 / 0

19.01.2016, 06:44

| Ответить | Цитировать | Написать

Запуск процедур 1С из Access

#39150483

akirey

Гость

Alex40na40,
Как Access будет знать, что в среде 1C идет отладка приложения?
Да и исходный текст процедуры видно только в 1C отладчике.
Я думаю не будет никак стоп происходить.

...

Рейтинг:

0 / 0

19.01.2016, 12:39

| Ответить | Цитировать | Написать

Запуск процедур 1С из Access

#39151023

interesno5

Гость

Alex40na40,

- как то непонятно где эта процедура должна выполняться, акес то плюнул, а дальше хоть трава не расти
- начал бы с простого, с процедурки с одним оператором "Сообщить", чтоб знать что оно туда вообще заходит ну и запусти не конфигуратор, а приложение (при запущенном конфигураторе и штатные клиенты-то не всегда работают)

...

Рейтинг:

0 / 0

20.01.2016, 00:22

| Ответить | Цитировать | Написать

3 сообщений из 3, страница 1 из 1

Форумы / Microsoft Access [игнор отключен] [закрыт для гостей] / Запуск процедур 1С из Access

Читали тему (0):

Читали форум (0):

Пользователи онлайн (0):

start [/forum/topic.php?fid=45&tid=1614046]:	0ms
get settings:	11ms
get forum list:	14ms
check forum access:	3ms
check topic access:	3ms
track hit:	37ms
get topic data:	13ms
get forum data:	3ms
get page messages:	37ms
get tp. blocked users:	2ms
others:	326ms

total:	449ms