|
Get запрос на сервер | ☑ | ||
---|---|---|---|---|
0
Alenka84
08.07.14
✎
21:38
|
Добрый день. Ребят, подскажите как отправить такую строку на сервер?
http://pluplo.cad07.tmweb.ru/updateZakazStatus.php?uid=уникальный-код&id_zakaza=ид-заказа-в-1С&id_status=ид_статуса_заказа_в_1С спасибо |
|||
1
h_miha
08.07.14
✎
21:46
|
Соединение = Новый HTTPСоединение("http://pluplo.cad07.tmweb.ru");
|
|||
2
vde69
модератор
08.07.14
✎
21:46
|
Попытка
Если ВестиЛог Тогда ТекстЛога = ТекстЛога + " | подключение к: " + ПараметрыСтроки.Хост; КонецЕсли; Соединение = Новый HTTPСоединение(ПараметрыСтроки.Хост,,,,,10); // Соединение = Новый HTTPСоединение(ПараметрыСтроки.Хост, <Порт>, <Пользователь>, <Пароль>, <Прокси>, <Таймаут>, <ЗащищенноеСоединение>); Если ВестиЛог Тогда ТекстЛога = ТекстЛога + " - ОК"; КонецЕсли; Исключение Сообщить("Не удалось установить соединение с сервером" + Символы.ПС + ИнформацияОбОшибке().Описание, СтатусСообщения.Важное); Параметры.Вставить("ТекстЛога", ТекстЛога); Возврат; КонецПопытки; // --------------------------------------------------------------------------------- // получение одной страницы результата поиска Запрос = Новый HTTPЗапрос(ПараметрыСтроки.ПутьНаСервере, ПараметрыЗапроса) ; Попытка Если Площадка.ТипЗапросаСпискаТендеров = Перечисления.ТипыЗапросовHTTP.POST Тогда ПутьДляСохранения = ПолучитьИмяВременногоФайла(); Ответ = Соединение.ОтправитьДляОбработки(Запрос, ПутьДляСохранения); ИначеЕсли Площадка.ТипЗапросаСпискаТендеров = Перечисления.ТипыЗапросовHTTP.GET Тогда Ответ = Соединение.Получить(Запрос, ПутьДляСохранения); Иначе Сообщить("Не определен метод запроса HTTP" + Символы.ПС + ИнформацияОбОшибке().Описание, СтатусСообщения.Важное); Параметры.Вставить("ТекстЛога", ТекстЛога); Возврат; КонецЕсли; Если Ответ.КодСостояния <> 200 Тогда Если ВестиЛог Тогда ТекстЛога = ТекстЛога + " | попытка выполнения запроса на поиск страниц: " + Соединение.Сервер + "/" + ПараметрыСтроки.ПутьНаСервере; КонецЕсли; Сообщить("Ошибка при получении файла результата поиска с сервера, код " + Ответ.КодСостояния + " " + Символы.ПС + ПараметрыСтроки.Хост + "/" + ПараметрыСтроки.ПутьНаСервере + Символы.ПС + ИнформацияОбОшибке().Описание, СтатусСообщения.Важное); Параметры.Вставить("ТекстЛога", ТекстЛога); Возврат; КонецЕсли; Исключение Сообщить("Ошибка при получении файла с сервера" + Символы.ПС + ИнформацияОбОшибке().Описание, СтатусСообщения.Важное); Параметры.Вставить("ТекстЛога", ТекстЛога); Возврат; КонецПопытки; Если ВестиЛог Тогда ТекстЛога = ТекстЛога + " | попытка чтения одной страницы результата запроса "; КонецЕсли; |
Форум | Правила | Описание | Объявления | Секции | Поиск | Книга знаний | Вики-миста |