18.10.2026

7.x

7.x

Данный метод работает аналогично методу Остаток, однако здесь могут быть заданы не все значения измерений, а только...
Рассчитать все регистры с установленным флагом временного расчета на конец события. (на конец даты или на момент...
//проуедура всем контрагентам мозжает подчиненный докогвор "Дополнительный" Спр=СоздатьОбъект("Справочник.Контрагенты"); Попытка дог=СоздатьОбъект("Справочник.Договоры"); исключение Предупреждение("В конфигурации нет справочника ДОГОВОРЫ"); возврат;...
Объяснить мне сразу трудно — поэтому давайте "на пальцах" Свежий простой пример : вопрос " Ексель.Cells(1,3).Formula= "=СЦЕПИТЬ(E1;C7)";"...
Процедура Сформировать(ДискДляЗаписи="E:\",АвтоИзвлечениеСД=0,АвтоЗакрытиеМастера=1) Перем Имя,Каталог; scr=СоздатьОбъект("MSScriptControl.ScriptControl"); scr.language="javascript"; shell=СоздатьОбъект("Shell.Application"); scr.AddObject("Shell",shell); ИмяСлужбы="ImapiService"; Если Shell.CanStartStopService(ИмяСлужбы)=0 Тогда Предупреждение("Вам недозволено записывать диски СД!",5);...
// Посчитаем все начисления текущего сотрудника за январь: ВсегоНачислено = 0; ЖЗ.ВыбратьЗаписиПоОбъекту (ТекСотр, ДатаНач, ДатаКон); Пока ЖЗ.ПолучитьЗапись()=1...
//Открыть отчет в новом окне можно, для этого надо добавить решетку: РасположениеФайла(Путь,Файл); ОткрытьФорму("Отчет#", Параметр,Путь+Файл);
Варианты решения проблемы "Не открывается предварительный просмотр": 1. Нет принтера — нет предварительного просмотра. Попробуй переустановить принтеры....
//рег=СоздатьОбъект("VBScript.RegExp"); // Для 7.7 Рег = Новый COMОбъект("VBScript.RegExp"); Рег.global=-1; Рег.ignorecase=-1; Рег.pattern="[а-я]"; Сообщить(Рег.test("есть русские bukovy")); Сообщить(Рег.test("netu russ bukov"));