|
HTTP соединение | ☑ | ||
|---|---|---|---|---|
|
0
Black Dragon
25.06.13
✎
18:29
|
Доброго дня!
не могу понять что у меня не так: ИмяФайлаЗапроса = "C:/log/request.txt"; Сообщить("Имя файла запроса " + ИмяФайлаЗапроса); ФайлЗапроса = Новый ТекстовыйДокумент; Результ = "TYPE = AUTH"; ФайлЗапроса.ДобавитьСтроку(Результ); Результ = "AUTH_FORM = Y"; ФайлЗапроса.ДобавитьСтроку(Результ); Результ = "login = yes"; ФайлЗапроса.ДобавитьСтроку(Результ); Результ = "pass = Ok"; ФайлЗапроса.ДобавитьСтроку(Результ); Результ = "USER_LOGIN = ''"; ФайлЗапроса.ДобавитьСтроку(Результ); Результ = "USER_PASSWORD = ''"; ФайлЗапроса.ДобавитьСтроку(Результ); Результ = "Dept = 1"; ФайлЗапроса.ДобавитьСтроку(Результ); ФайлЗапроса.Записать(ИмяФайлаЗапроса); СерверИсточник = "http://portal.dengisrazy.ru"; РесурсНаСервере = "payments/webservice.php"; ПроксиСервер = Новый ИнтернетПрокси; ПроксиСервер.Установить("http",СерверИсточник); Boundary = СтрЗаменить(Строка(Новый УникальныйИдентификатор()), "-", ""); ЗаголовокHTTP = Новый Соответствие(); ЗаголовокHTTP.Вставить("Content-Type", "text/plain; boundary=" + Boundary); //При необходимости зададим Referer, например таким образом СтрокаСоединения = СтрокаСоединенияИнформационнойБазы(); СерверИсточник = НСтр(СтрокаСоединения, "Srvr") + НСтр(СтрокаСоединения, "Ref"); ЗаголовокHTTP.Вставить("Referer", СерверИсточник); Попытка Соединение = Новый HTTPСоединение(СерверИсточник); Исключение Сообщить(ИнформацияОбОшибке().Описание, СтатусСообщения.Важное); Возврат; КонецПопытки; Если Соединение = Неопределено Тогда Сообщить("Ошибка установки соединения с " + СерверИсточник + ОписаниеОшибки()); Возврат; КонецЕсли; ФайлРезультата = "C:/log/answer.txt"; Попытка Соединение.ОтправитьДляОбработки(ИмяФайлаЗапроса, РесурсНаСервере, ФайлРезультата); Исключение Сообщить(ИнформацияОбОшибке().Описание, СтатусСообщения.Важное); Возврат; КонецПопытки; КонецПроцедуры выдает сообщения: ошибка при вызове метода контекста ОтправитьДляОбработки полдня мучаюсь, не могу понять |
| Форум | Правила | Описание | Секции | Поиск |