Как получить json в 1с?

Question

[Follex]

Добрый день, стоит задача получить весь список юзеров через json с гитхаба https://api.github.com/users

Соединение = Новый HTTPСоединение("api.github.com/",443);
	Запрос = Новый HTTPЗапрос("/users");
	 	
	Результат = Соединение.Получить(Запрос);

как получить весь список?

Answer 1

[Denis Melnikov]

К примеру, так

хОтвет = хСоединение.ВызватьHTTPМетод("POST",хЗапрос);
	
Если хОтвет.КодСостояния <> 200 Тогда
	#ЕСЛИ КЛИЕНТ ТОГДА
		Сообщить("Ошибка. Код ответа " + хОтвет.КодСостояния);
	#КОНЕЦЕСЛИ
	Возврат;
КонецЕсли;
	
СтрокаОтвета = хОтвет.ПолучитьТелоКакСтроку(КодировкаТекста.UTF8);
Чтение		 =	Новый ЧтениеJSON;
чтение.УстановитьСтроку(СтрокаОтвета);
Джисон = ПрочитатьJSON(Чтение,Истина);

Comments

[Follex]

КодСостояния равен 301, и метода ПолучитьТелоКакСтроку нету, в чем может быть проблема? До этого код был равен 200, сейчас 301

[Denis Melnikov]

301 это редирект.
А если нет такого метода, то вы не получили HTTP ответ.

[Denis Melnikov]

Попробуйте соединение вот вызвать

хСоединение = 	Новый HTTPСоединение(Сайт,443,,,,,Новый ЗащищенноеСоединениеOpenSSL);

[Follex]

Denis Melnikov, СтрокаОтвета получает значение {"message":"Not Found","documentation_url":"https://developer.github.com/v3"}
И теперь код равен 404, то есть страница не найдена

[Follex]

Denis Melnikov, а нет, все заработало, получил то что и хотел, большое Вам спасибо! :)

[Denis Melnikov]

Попробуйте так.

сайт = "api.github.com";
	хСоединение = 	Новый HTTPСоединение(Сайт,443,,,,,Новый ЗащищенноеСоединениеOpenSSL);
	хОтвет = хСоединение.ВызватьHTTPМетод("GET",новый HTTPЗапрос("users"));
  
	Если хОтвет.КодСостояния <> 200 Тогда
	  #ЕСЛИ КЛИЕНТ ТОГДА
	    Сообщить("Ошибка. Код ответа " + хОтвет.КодСостояния);
	  #КОНЕЦЕСЛИ
	  Возврат;
	КонецЕсли;
	  
	СтрокаОтвета = хОтвет.ПолучитьТелоКакСтроку(КодировкаТекста.UTF8);
	Чтение		 =	Новый ЧтениеJSON;
	чтение.УстановитьСтроку(СтрокаОтвета);
	Джисон = ПрочитатьJSON(Чтение,Истина);