Ден Ден

71
Рейтинг

FirePyres
Ден Ден



  •   Регистрация: 24.07.2014 (9 лет назад)

  •   Был(а) на сайте: 22.04.2024

Друзья
  • Дмитрий Гиленок
  • Никита Верхолазов
  • Дмитрий Малышев
  • Евгений Комиссаров
  • Сергей
  • Денис Сороченко
  • Андрей Волин
Подписчики 8

Группы

Профессиональный разработчик

Участник Meetup

IE 2021 Участник

Рейтинг 71

Создаем свой календарь для произвольных целей

Отчеты и формы Программист Платформа 1С v8.3 Конфигурации 1cv8 Абонемент ($m) Внешняя обработка (ert,epf) Работа с интерфейсом

Надо было организовать запись для пользователей через календарь, не смог найти пример, чтобы не пришлось писать с нуля. Пришлось писать самому, решил поделиться своим примером.

1 стартмани

02.12.2016    13692    20    FirePyres    4       

8

Создаем бота Telegram

Инструменты и обработки Программист Платформа 1С v8.3 Конфигурации 1cv8 Абонемент ($m) Внешняя обработка (ert,epf) Мессенджеры и боты

Легко и непринужденно создаем бота, который поможет получать данные из 1С, используя API Teletram

1 стартмани

30.09.2016    27691    110    FirePyres    33       

38

Поиск изменений в составах метаданных при обновлении конфигурации

Инструменты и обработки Программист Платформа 1С v8.3 Конфигурации 1cv8 Windows Абонемент ($m) Внешняя обработка (ert,epf) Инструментарий разработчика

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

1 стартмани

13.04.2016    6989    11    FirePyres    3       

4

Комментарии

DevСоздаем бота Telegram#33 05.05.22 6:53
пример:
Код
ТекстКлавиатуры = 
"{""inline_keyboard"":[[{""text"":""Стр1Кн1"",""callback_data"":""Стр1Кн1""},{""text"":""Стр1Кн1"",""callback_data"":""Стр1Кн1""}]," //Массив кнопок 1 строка
+"[{""text"":""Стр2Кн1"",""callback_data"":""%1""}]"// массив кнопок 2 строка
+ "]}";

Прикрепленные файлы:

изображение_viber_2022-05-05_10-51-58-562.jpg
НовостиДесятая конференция Infostart Event 2021: мы это сделали!#334 13.05.21 13:02
Поменьше откровенно рекламных докладов
ОбменМой пример интеграции с Viber#2 05.10.20 11:23
В основном я хотел поделиться как я реализовал обратную связь от вайбера без прямого https.
ОбменМой пример интеграции с Viber#0 02.10.20 12:00
Пример интеграции бота Viber и 1С.
БУНе проходят проверку файлы (СЗВ-ТД) сформированные в 7.7.#14 20.02.20 13:00
Была такая проблема в БП3.0 на релизе 3.0.75.70
Не правильно формируется файл XML
Пришлось дорабатывать общие модули
Раздел формируется:
<ОснованиеУвольнения>
<НормативныйДокумент>Трудовой кодекс Российской Федерации</НормативныйДокумент>
<Статья>77</Статья>
<Часть>1</Часть>
<Пункт>3</Пункт>
</ОснованиеУвольнения>

А должен формироваться:
<ОснованиеУвольнения>
<УТ2:НормативныйДокумент>Трудовой кодекс Российской Федерации</УТ2:НормативныйДокумент>
<УТ2:Статья>77</УТ2:Статья>
<УТ2:Часть>1</УТ2:Часть>
<УТ2:Пункт>3</УТ2:Пункт>
</ОснованиеУвольнения>

После изменений отчет успешно сдан
Речь именно о префиксах "УТ2:"
ОбменСамый примитивный HTTP-сервис в мире#15 13.09.19 7:41
Спасибо большое.
AdminПолучение списка пользователей домена#19 13.03.19 9:09
У нас в базе я пользователей из ActiveDirectory получаю, ни каких ограничений.
Где слямзил, не помню где.

Код

&НаСервере
Процедура ОбновитьСписокПользователейActiveDirectoryНаСервере()

    ТЗ=Новый ТаблицаЗначений;
    АДСИ=Новый COMОбъект("ADSystemInfo");
    Контроллер=АДСИ.GetAnyDCName();
    Домен=АДСИ.DomainDNSName;
   
   //Пользователь="администратор@" + Домен;
   //Пароль="СуперпарольАдминистратора";

    ДСО=ПолучитьCOMОбъект("GC:");
    Корень=ДСО.OpenDSObject("GC://RootDSE", Пользователь, Пароль,1);
    Провайдер="Provider=ADSDSOObject;";

    ИмяДомена = "Infostart-Infostart";

    Соединение = Новый COMОбъект("ADODB.Connection");
    Соединение.Open(Провайдер);
   
   ТекстЗапроса = "<GC://DC="+ИмяДомена+",DC=com>;(sAMAccountName=*.*);AdsPath;subTree";
    Записи=Соединение.Execute(ТекстЗапроса);
   
   Пока Записи.EOF=0 Цикл
      obj = ПолучитьCOMОбъект(Записи.Fields(0).Value);
      ИмяПользователя = obj.displayName;
      ЛогинAD = obj.userPrincipalName;
      Запись = РегистрыСведений.ПользователиActiveDirectory.СоздатьМенеджерЗаписи();
      Запись.Логин = ЛогинAD;
      Запись.Прочитать();
      Запись.Логин = ЛогинAD;
      Запись.ИмяПользователя = ИмяПользователя;
      Запись.Записать();
        Записи.MoveNext();
    КонецЦикла;
КонецПроцедуры

DevТест :)#6 09.08.18 8:32
(3) А почему можете сказать? Я предугадать не смог.