burza @ Сегодня, 11:45
, Если бы это была стандартная сериализация - тогда можно было бы получить ответ. У Вас чем-то сформирован файл - читайте, разбирайте, вписывайте в Контрагенты
Если TипJSON = ТипЗначенияJSON.Число ИЛИ TипJSON = ТипЗначенияJSON.Строка ИЛИ TипJSON = ТипЗначенияJSON.Булево ИЛИ TипJSON = ТипЗначенияJSON.Null Тогда Значение = ЧтениеJSON.ТекущееЗначение; ИначеЕсли TипJSON = ТипЗначенияJSON.Комментарий Тогда Комментарий = ЧтениеJSON.ТекущееЗначение; ИначеЕсли TипJSON = ТипЗначенияJSON.ИмяСвойства Тогда ИмяСвойства = ЧтениеJSON.ТекущееЗначение; КонецЕсли;
тогда наверно Значение и ИмяСвойства надо заполнять в одном разделе Если
типо так
Если TипJSON = ТипЗначенияJSON.Число ИЛИ TипJSON = ТипЗначенияJSON.Строка ИЛИ TипJSON = ТипЗначенияJSON.Булево ИЛИ TипJSON = ТипЗначенияJSON.Null Тогда ИмяСвойства = ЧтениеJSON.ТекущееЗначение; Значение = ЧтениеJSON.ТекущееЗначение; ,,, КонецЕсли;
вооще-то проще заполнить Соответствие - Ключ_Значение, а потом обрабатывать
Если TипJSON = ТипЗначенияJSON.Число ИЛИ TипJSON = ТипЗначенияJSON.Строка ИЛИ TипJSON = ТипЗначенияJSON.Булево ИЛИ TипJSON = ТипЗначенияJSON.Null Тогда Значение = ЧтениеJSON.ТекущееЗначение; ИначеЕсли TипJSON = ТипЗначенияJSON.Комментарий Тогда Комментарий = ЧтениеJSON.ТекущееЗначение; ИначеЕсли TипJSON = ТипЗначенияJSON.ИмяСвойства Тогда
ИмяСвойства = ЧтениеJSON.ТекущееЗначение;
///////////////////////////////////////////////////////////// Если ИмяСвойства ="login" Тогда // Сообщить(Значение); //НовыйЭлемент.Наименование = Значение; //НовыйЭлемент.НаименованиеПолное = Значение;
Группа: Пользователи
Сообщений: 28
Спасибо сказали: 9 раз
Рейтинг: 0
burza @ Вчера, 16:45
,
ЧтениеJSON = Новый ЧтениеJSON; ЧтениеJSON.ОткрытьФайл("c:/test.json"); ПрочитанноеЗначениеКотороеНеобходимоПосмотретьВОтладчике = ПрочитатьJSON(ЧтениеJSON,Истина); Для Каждого стр Из ПрочитанноеЗначениеКотороеНеобходимоПосмотретьВОтладчике["result"] Цикл НовыйЭлемент = Справочники.Контрагенты.СоздатьЭлемент(); НовыйЭлемент.Код=стр["customerID"]; НовыйЭлемент.Наименование=стр["login"]; НовыйЭлемент.Записать(); КонецЦикла;
1С Предприятие 8.3, 1С Предприятие 8.2, 1С Предприятие 8.1, 1С Предприятие 8.0, 1С Предприятие 7.7, Литература 1С, Общие вопросы по администрированию 1С, Методическая поддержка 1С - всё в одном месте: на Украинском 1С форуме!