Различия

Здесь показаны различия между выбранной ревизией и текущей версией данной страницы.

--- ru:technical_manual:work_via_ole:script_work_via_ole [2022/11/29 14:41]
korennoi [Пример создания оргединицы и работа с ней]
+++ ru:technical_manual:work_via_ole:script_work_via_ole [2023/03/16 12:20] (текущий)
@@ Строка 179: / Строка 179: @@
     Set oleapp = CreateObject("ByteEnterprise.OleApplication")
-    'Инициализации клиентского приложения, в качестве параметров передаются имя сервера, название базы,  версия продукта
+    'Инициализации клиентского приложения, в качестве параметров передаются имя сервера, название базы, версия продукта
     Set Client_app = oleapp.ЗапуститьКлиентскоеПриложение("ИмяСервера", "ИмяБазы", "РедакцияПрограммы")
@@ Строка 382: / Строка 382: @@
 Sub ВыводПотомковПапок()
-    ' Получение объекта приложения
+    'Получение объекта приложения
     Set oleapp = CreateObject("ByteEnterprise.OleApplication")
-    ' Инициализации приложения, в качестве параметров передаются имя сервера, название базы,  версия продукта
+    'Инициализации приложения, в качестве параметров передаются имя сервера, название базы, версия продукта
     Set client_app = oleapp.ЗапуститьКлиентскоеПриложение("ИмяСервера", "ИмяБазы", "РедакцияПрограммы")
-    ' Получаем только папки в корне
+    'Получаем только папки в корне
     Set Корень = oleapp.ПолучитьКорневуюГруппуКласса("БизнесМодель.НаправленияДеятельности")
@@ Строка 416: / Строка 416: @@
       For Счётчик2 = 1 to Потомки
-    ' И выводим на экран
+    'И выводим на экран
                 Set Потомок = Потомки.ПолучитьЭлемент(Счётчик)
@@ Строка 458: / Строка 458: @@
+{(rater>id=ru_technical_manual_work_via_ole_script_work_via_ole|name=Сценарии работы с Business Studio через OLE|type=vote|trace=ip|headline=off)}