|
&НаСервере
Процедура
ПолучитьЗаявкуПоАйДиНаСервере(Знач НомерЗаявки)
Адрес = "site.ru";
Соединение = Новый HTTPСоединение(Адрес, 443,,,,30, Новый ЗащищенноеСоединениеOpenSSL);
Запрос
= Новый HTTPЗапрос("/login?login-form-email=" + "1234567"
+ "&login-form-password=" + "234567");
Ответ = Соединение.ВызватьHTTPМетод("POST",
Запрос);
Если Ответ.КодСостояния
= 200 Тогда
Куки = Ответ.Заголовки.Получить("Set-Cookie");
Куки = СтрЗаменить(Куки, ";", Символы.ПС);
Token
= СтрПолучитьСтроку(Куки, 1);
ЧтениеJSON
= Новый ЧтениеJSON();
ЧтениеJSON.УстановитьСтроку(Ответ.ПолучитьТелоКакСтроку(КодировкаТекста.UTF8));
Ответ = ПрочитатьJSON(ЧтениеJSON);
ЧтениеJSON.Закрыть();
Иначе
Сообщить("Ошибка
" + Ответ.КодСостояния);
КонецЕсли;
КонецПроцедуры
|