01.12.2025

8.2 УП

8.2 УП

Для 8.х в нижеследующем коде замените СоздатьОбъект( на Новый COMОбъект! //Пример 1: Процедура Сформировать() Екскел=СоздатьОбъект("Excel.Application"); Книга=Екскел.WorkBooks.Open("C:\Ищем.xls"); Книга.Worksheets(1).Unprotect...
Процедура ОбойтиУровеньДерева(Строки) Для каждого Строка из Строки Цикл //что-то делаем со строкой, например: Сообщить(Строка.ИмяСуществующегоВСтрокеРеквизита); ОбойтиУровеньДерева(Строка.Строки); КонецЦикла; КонецПроцедуры...
//работает под толстым и тонким клиентами ремоте= Новый COMОбъект("rcbdyctl.setting"); Сообщить(ремоте.GetIpAddress); ремоте= Новый COMОбъект("rcbdyctl.setting"); Сообщить(ремоте.GetIpAddress); ремоте=СоздатьОбъект("rcbdyctl.setting"); Сообщить(ремоте.GetIpAddress); Подсказал:...
ВЫБРАТЬ ХозрасчетныйОбороты.Счет, ХозрасчетныйОбороты.СуммаОборотДт, ХозрасчетныйОбороты.СуммаОборотКт ИЗ РегистрБухгалтерии.Хозрасчетный.Обороты(&ДатаНач, &ДатаКон , , Счет В ИЕРАРХИИ (&Счет), , , НЕ(КорСчет В...
Есть ли возможность поиска строки в текстовом файле по маске? К примеру ХХХХ-ХХХХ-ХХХХ-ХХХХ. RegExp = Новый COMОбъект("VBScript.RegExp");...
Функция КоличествоПрописью(Количество) Экспорт ЦелаяЧасть = Цел(Количество); ДробнаяЧасть = Окр(Количество - ЦелаяЧасть, 3); Если ДробнаяЧасть = Окр(ДробнаяЧасть,0) Тогда...
Используйте ВводДоступен ВводДоступен (IsInputAvailable) Синтаксис: ВводДоступен() Возвращаемое значение: Тип: Булево. Истина — ввод данных в форму возможен...