Добрый день! HTTP-сервис получает запрос в формате x-www-form-urlencoded, нужно разобрать. В принципе ничего сложного нет, но интересно есть ли готовая функция для этого в 1С?

json?

(1) нет, там прилетает вот такая примитивная строка: client_id=User1&client_secret=bhif293fh982fh&grant_type=client_credentials&scope=read%20write

Я сделал простенькую функцию:
Функция xwwwformurlencodedВСтруктуру(ТелоЗапроса)

    Структура = Новый Структура;
    
    ТелоЗапроса = СтрЗаменить(ТелоЗапроса, "&", Символы.ПС);

    Для Счетчик = 1 По СтрЧислоСтрок(ТелоЗапроса) Цикл
        ТекСтрока = СтрПолучитьСтроку(ТелоЗапроса, Счетчик);
        Поз = СтрНайти(ТекСтрока, "=");
        Ключ = Лев(ТекСтрока, Поз-1);
        Значение = Прав(ТекСтрока, СтрДлина(ТекСтрока) - Поз);
        Структура.Вставить(Ключ, Значение);        
    КонецЦикла;
    
    Возврат Структура;
    
КонецФункции

но вдруг есть готовая?

(3) Боже мой, какой ужас :))
СтрРазделить

(4)РазложитьСтрокуВМассивПодстрок

(6) И где там определение ключа до = и значения после =?

(7) а где?

(6) (5) Ага, а потом еще раз разложить каждый элемент массива.
Как по мне, что в лоб, что по лбу. ТС написал функцию, ну и молодец

(5) спасибо! клевая функция

(7)ну дальше уж дело техники)

(9) Ну да, Баба Яга как всегда против
Второй раз раскладывать ничего не нужно, кстати, просто ищешь = и все

(8) Вот именно, что нигде

(10) Пожалуйста

(5) так лучше?

Функция xwwwformurlencodedВСтруктуру(ТелоЗапроса)

    Структура = Новый Структура;
    
    МассивСтрок = СтрРазделить(ТелоЗапроса, "&");
    
    Для Каждого ТекСтрока Из МассивСтрок Цикл
        Поз = СтрНайти(ТекСтрока, "=");
        Ключ = Лев(ТекСтрока, Поз-1);
        Значение = Прав(ТекСтрока, СтрДлина(ТекСтрока) - Поз);
        Структура.Вставить(Ключ, Значение);
    КонецЦикла;
    
    Возврат Структура;
    
КонецФункции

(13) вы к тому что не факт что символ "=" является разделителем ключа и значения?

(12) Покажи без второго расклада. Код сильно сложнее будет, чем в (3)?

(17) так?
Функция xwwwformurlencodedВСтруктуру(ТелоЗапроса)

    Структура = Новый Структура;
    
    МассивСтрок = СтрРазделить(ТелоЗапроса, "&");
    
    Для Каждого ТекСтрока Из МассивСтрок Цикл
        Мас = СтрРазделить(ТекСтрока, "=");
        Структура.Вставить(Мас[0], Мас[1]);
    КонецЦикла;
    
    Возврат Структура;
    
КонецФункции

+(11)ПараметрыИзСтроки на это есть

(18) Не. Он грозиться показать алгоритм с одним СтрРазделить по "="

+(19)То бишь резюмируя, делается так: 1)Получаем массив с разбитыми подстроками РазложитьСтрокуВМассивПодстрок, 2)Для каждой подстроки вызываем ПараметрыИзСтроки.

(21) РазложитьСтрокуВМассивПодстрок и ПараметрыИзСтроки - а это откуда брать? это функции БСП?

(22)общий модуль СтроковыеФункцииКлиентСервер, ну или поиском у себя поищи.

(23) понятно, мне не подходит, у меня пустая конфа)

(24)типовых под рукой нет совсем? можно оттуда копирнуть, 2 функции