Выполнение запросов из VBA

@Miduza · Регистрация: 27.09.2012

Author24 — интернет-сервис помощи студентам

День добрый!

Есть база 1Сv77 (в dbs). Пытаюсь настроиться на неё чтобы вытягивать из неё некотурую информацию... к примеру формировать журнал-ордер счета по субконто и всё это через VBA.

есть такой код - который создаёт экземпляр программы с прохождением в ней аутентификации:

Visual Basic

Public v7 As Object
 
Sub ConnectV77()
st = " /D" & """C:\Documents and Settings\financier\Мои документы\Копия базы\""" & " /N " & """Ильченко_АВ""" & " /P" & """334455"""
Set v7 = CreateObject("v77.Application")
result = v7.Initialize(v7.RMTrade, st, "yes_SPLASH_SHOW")
End Sub

Понимаю что дальше нужно создавать объект настройки с описанием критериев к формированию документов, получить ответ на сформированный запрос, и чудом вытянуть его туда куда необходимио и как необходимо... Прошу от знатаков хотябы пример формирования запроса через VBA, чтобы понять хотябы принципы его формирования...

@duk337 · 21.10.2012, 01:34

а отсутствие скобок - это штатно?

Сообщение от Miduza

тут даты работают...

- это как? Проводки юзаются?

Добавлено через 1 минуту
А! Извини. С запросом работает, а с операцией нет...

Добавлено через 3 минуты
ну тогда написать функцию экспорт. включить её в обработку. обработку инициализировать обр=в7.критобжект
обр.функция(п1,п2)
параметры в общедоступном виде, в огбработке их обработать из строк и чисел.
ПолучитьОперацииСПроводками() - она всю жизнь была глюкавая. И что за объект "Операция" - документ или обороты - темна вода во облацех

@Miduza · 22.10.2012, 19:48 **[ТС]**

Ясно.. в общем задумка - гиблое дело...
Остаётся только одно - отредактировать надстройку под 1С, а из VBA обеспечить её запуск и выполнение...Назовём этот вариант - "Услуга Трезвый водитель"... не умеет VBA ездить на 1С, Пусть тогда хотябы говорит куда ехать нужно(((

Добавлено через 2 часа 16 минут
Ещё маленький вопрос...
В самой обработке после нажатия "ОК", она отрабатывается, но остаётся висеть....тоесть в VBA

Visual Basic

1	Set it = v7.EvalExpr("ОткрытьФормуМодально(""Обработка"",,""C:\....."")")

На этой строке останавливается...

Понятно что Set v7 = Nothing - убьёт Ole подключение, но до него дело так и не доходит...

Как быть? пробовал в обработке перед "КонецПроцедуры" в "Процедура Сформировать" прописать "Возврат"... ахтунг...

короче - как закрыть 1С при нажатии кнопки "ОК" в форме обработки?

Добавлено через 27 минут
Разобрался
СтрокаДействийФормы="Сохранить, Закрыть";
Вопрос снят

Добавлено через 6 часов 30 минут
В общем всё заработало.
Симбиоз Обработки и VBA.

@duk337 2955 / 1767 / 82 Регистрация: 03.11.2011 Сообщений: 8,280
	21.10.2012, 01:34	21
	а отсутствие скобок - это штатно? Сообщение от Miduza тут даты работают... - это как? Проводки юзаются? Добавлено через 1 минуту А! Извини. С запросом работает, а с операцией нет... Добавлено через 3 минуты ну тогда написать функцию экспорт. включить её в обработку. обработку инициализировать обр=в7.критобжект обр.функция(п1,п2) параметры в общедоступном виде, в огбработке их обработать из строк и чисел. ПолучитьОперацииСПроводками() - она всю жизнь была глюкавая. И что за объект "Операция" - документ или обороты - темна вода во облацех 1

	22.10.2012, 19:48