1с ошибка при вызове метода контекста отправитьдляобработки

Вот Код:

   имяФайлаОтправки = «d:request.txt»;

   имяФайлОтправки = ПолучитьимяВременногоФайла(«txt»);

   
   ЗаписьТекста = Новый ЗаписьТекста(имяФайлаОтправки);

   ЗаписьТекста.Записать(«code=»+КодФормы+»&series=»+СерияБСО+»&number=»+НомерБСО);

   ЗаписьТекста.Закрыть();

   имяВыходногоФайла = ПолучитьимяВременногоФайла(«xml»);     // наш сервер возвращает ответы в виде XML

   //имяВыходногоФайла = «d:answer.xml»;

   ФайлОтправки = Новый Файл(имяФайлаОтправки);

   РазмерФайлаОтправки = XMLСтрока(ФайлОтправки.Размер());

   
   Соединение = Новый HTTPСоединение(«www.m.blank.bisc.by/Query»);

   Заголовки = Новый Соответствие();

   //Заголовки.Вставить(«host», «http://m.blank.bisc.by/Query:8080»);  

   /////

   Запрос = Новый HTTPЗапрос();

   Запрос.УстановитьТелоИзСтроки();

   Соединение.Записать(Запрос);

   
   Соединение.ОтправитьДляОбработки(Запрос,»GetAnswer», имяВыходногоФайла, Заголовки);

           Попытка

       УдалитьФайлы(имяФайлаОтправки);

   Исключение

   КонецПопытки;

   // обработаем ответ сервера

       ЧтениеXML = Новый ЧтениеXML;

   ЧтениеXML.ОткрытьФайл(имяВыходногоФайла);

   Пока ЧтениеXML.Прочитать() Цикл

   // чтение ответа в виде XML файла

   КонецЦикла;

   ЧтениеXML.Закрыть();

(3) Запрос = Новый HTTPЗапрос();

   Запрос.УстановитьТелоИзСтроки();

   Соединение.Записать(Запрос);

   
   Соединение.ОтправитьДляОбработки(Запрос…

а так разве можно Put и Post с одинаковым запросом, тем более что он пустой ?

вот так пробуй:

   ИмяФайлаОтправки = ПолучитьИмяВременногоФайла(«txt»);

   
   POSTПараметры = Новый ЗаписьТекста(ИмяФайлаОтправки, КодировкаТекста.UTF8,, Истина, Символы.ПС); //ТекстБезБОМ

   POSTПараметры.Записать(«code=» + КодФормы + «&series=» + СерияБСО + «&number=» + НомерБСО);

   POSTПараметры.Закрыть();

   ИмяВыходногоФайла = ПолучитьИмяВременногоФайла(«xml»);

   
   ФайлОтправки = Новый Файл(ИмяФайлаОтправки);

   РазмерФайлаОтправки = XMLСтрока(ФайлОтправки.Размер());

   
   Данные = «code=» + КодФормы + «&series=» + СерияБСО + «&number=» + НомерБСО;

   Заголовки = Новый Соответствие();

   Заголовки.Вставить(«POST /Query HTTP/1.1»);

   Заголовки.Вставить(«Host», «www.m.blank.bisc.by»);    

   Заголовки.Вставить(«Referer», «www.m.blank.bisc.by»);

   Заголовки.Вставить(«Content-Type», «application/x-www-form-urlencoded»);

   Заголовки.Вставить(Данные);

   Соединение = Новый HTTPСоединение(«www.m.blank.bisc.by»);

   Соединение.ОтправитьДляОбработки(ИмяФайлаОтправки, «v8», ИмяВыходногоФайла, Заголовки);

   
   Попытка

       УдалитьФайлы(ИмяФайлаОтправки);

   Исключение

   КонецПопытки;

   
   ЧтениеXML = Новый ЧтениеXML;

   ЧтениеXML.ОткрытьФайл(ИмяВыходногоФайла);

   Пока ЧтениеXML.Прочитать() Цикл

       …

   КонецЦикла;

   ЧтениеXML.Закрыть();

   
   Попытка

       УдалитьФайлы(ИмяВыходногоФайла);

   Исключение

   КонецПопытки;

Соединение.ОтправитьДляОбработки(ИмяФайлаОтправки, «v8», ИмяВыходногоФайла, Заголовки);

замени на это

Соединение.ОтправитьДляОбработки(ИмяФайлаОтправки, «Query», ИмяВыходногоФайла, Заголовки);

ты во втором параметре убрал или в заголовке?

должно быть так:

Соединение.ОтправитьДляОбработки(ИмяФайлаОтправки, «Query», ИмяВыходногоФайла, Заголовки);

у тебя же адрес:

www.m.blank.bisc.by/Query

(16)Да, я убрал во втором парметре! Если оставить его на месте то вот какую ошибку ловлю:

{Форма.Форма.Форма(82)}: Ошибка при вызове метода контекста (ОтправитьДляОбработки)

   Соединение.ОтправитьДляОбработки(ИмяФайлаОтправки,»Query», ИмяВыходногоФайла, Заголовки);

по причине:

Ошибка при выполнении файловой операции  ‘Query’

по причине:

(17) Да работаю через шлюз, по-другому никак

хммм, интересно. на адрес в (25) не заходит, но через http://m.blank.bisc.by/ без проблем

Вариант синтаксиса: По HTTP-запросу

Синтаксис:

ОтправитьДляОбработки(<HTTPЗапрос>, <ИмяВыходногоФайла>)

Параметры:

<HTTPЗапрос> (обязательный)

Тип: HTTPЗапрос.

HTTP-запрос.

<ИмяВыходногоФайла> (необязательный)

sttt это нормально что в синт.помощнике метод описан по другому??

поменяй адрес http://m.blank.bisc.by/Query и жизнь наладиться и похоже прокси тебе не нужен, проблема была в неверном адресе

у меня так:

ОтправитьДляОбработки(<Источник>, <АдресРесурса>, <ИмяВыходногоФайла>, <Заголовки>)

Параметры:

<Источник> (обязательный)

Тип: Строка.

Имя файла-источника.

<АдресРесурса> (обязательный)

Тип: Строка.

Адрес ресурса на сервере, в который посылаются данные из источника.

<ИмяВыходногоФайла> (обязательный)

Тип: Строка.

Имя выходного файла, в который записываются полученные с сервера данные.

<Заголовки> (необязательный)

Тип: Строка.

Указываются заголовки, добавляемые к запросу на сервер. Текстовые пары вида <Заголовок>:<Значение>, разделяемые комбинацией ВК+ ПС.

Описание:

Отправить ресурс на указанный адрес для обработки.

Доступность:

Тонкий клиент, сервер, толстый клиент, внешнее соединение.

ИмяФайлаОтправки = ПолучитьИмяВременногоФайла(«txt»);

   
  POSTПараметры = Новый ЗаписьТекста(ИмяФайлаОтправки, КодировкаТекста.UTF8,, Истина, Символы.ПС);  //ТекстБезБОМ

   POSTПараметры.Записать(«code=» + КодФормы + «&series=» + СерияБСО + «&number=» + НомерБСО);

   POSTПараметры.Закрыть();

   ИмяВыходногоФайла = ПолучитьИмяВременногоФайла(«xml»);

   
   ФайлОтправки = Новый Файл(ИмяФайлаОтправки);

   РазмерФайлаОтправки = XMLСтрока(ФайлОтправки.Размер());

   
  // Данные = «code=» + КодФормы + «&series=» + СерияБСО + «&number=» + НомерБСО;

   Заголовки = Новый Соответствие();

   Заголовки.Вставить(«POST /Query HTTP/1.1»);

   Заголовки.Вставить(«Host», «http://m.blank.bisc.by»);    

   Заголовки.Вставить(«Referer», «http://m.blank.bisc.by»);

   Заголовки.Вставить(«Content-Type», «application/x-www-form-urlencoded»);

  // Заголовки.Вставить(Данные);

 
  //Прокси = Новый ИнтернетПрокси;

  //Прокси.Установить(«http», «192.168.0.206», 8080);

  //Соединение = Новый HTTPСоединение(«http://m.blank.bisc.by»);

 
   Соединение = Новый HTTPСоединение(«http://m.blank.bisc.by»);

   Соединение.ОтправитьДляОбработки(ИмяФайлаОтправки,»Query», ИмяВыходногоФайла, Заголовки);

   
   Попытка

       УдалитьФайлы(ИмяФайлаОтправки);

   Исключение

   КонецПопытки;

   
   ЧтениеXML = Новый ЧтениеXML;

   ЧтениеXML.ОткрытьФайл(ИмяВыходногоФайла);

   Пока ЧтениеXML.Прочитать() Цикл

     
 КонецЦикла;

   ЧтениеXML.Закрыть();

   
   Попытка

       УдалитьФайлы(ИмяВыходногоФайла);

   Исключение

   КонецПопытки;

замени везде «http://m.blank.bisc.by» на

   Заголовки.Вставить(«Host», «m.blank.bisc.by»);    

   Заголовки.Вставить(«Referer», «m.blank.bisc.by»);

и т.д.

(37) невероятно))

ладно не буду мучить, вот рабочий вариант, единственное сделано на управляемых формах, соответственно необходимо поменять реквизиты:

   ИмяФайлаОтправки = ПолучитьИмяВременногоФайла(«txt»);

   
   POSTПараметры = Новый ЗаписьТекста(ИмяФайлаОтправки, КодировкаТекста.UTF8,, Истина, Символы.ПС); //ТекстБезБОМ

   POSTПараметры.Записать(«code=» + Объект.КодФормы + «&series=» + Объект.СерияБСО + «&number=» + Объект.НомерБСО);

   POSTПараметры.Закрыть();

   ИмяВыходногоФайла = ПолучитьИмяВременногоФайла(«txt»);

   Заголовки = Новый Соответствие();

   Заголовки.Вставить(«POST /GetAnswer HTTP/1.1»);

   Заголовки.Вставить(«Host», «m.blank.bisc.by»);

   Заголовки.Вставить(«Referer», «http://m.blank.bisc.by/Query»);

   Заголовки.Вставить(«Cookie», «ASP.NET_SessionId=orlnnpbz2vrxrbuobsh4fmom»);  // без этих кукисов работать не будет и в ЗаголовокGET такой же должен быть. посмотри по форуму, недавно пробегал пример как куки подставлять

   Заголовки.Вставить(«Connection», «keep-alive»);

   Заголовки.Вставить(«Content-Type», «application/x-www-form-urlencoded»);

   Соединение = Новый HTTPСоединение(«m.blank.bisc.by»);

   Соединение.ОтправитьДляОбработки(ИмяФайлаОтправки, «GetAnswer», ИмяВыходногоФайла, Заголовки);

   
   ЗаголовокGET = Новый Соответствие();

   ЗаголовокGET.Вставить(«GET /BlankInfo HTTP/1.1»);

   ЗаголовокGET.Вставить(«Host», «m.blank.bisc.by»);

   ЗаголовокGET.Вставить(«Referer», «http://m.blank.bisc.by/Query»);

   ЗаголовокGET.Вставить(«Cookie», «ASP.NET_SessionId=orlnnpbz2vrxrbuobsh4fmom»);

   ЗаголовокGET.Вставить(«DNT», «1»);

   ЗаголовокGET.Вставить(«Connection», «keep-alive»);

   
   Соединение.Получить(«/BlankInfo», ИмяВыходногоФайла, ЗаголовокGET);

   
   Попытка

       УдалитьФайлы(ИмяФайлаОтправки);

   Исключение

   КонецПопытки;

   
   ТекстовыйДокумент = Новый ТекстовыйДокумент;

   ТекстовыйДокумент.Прочитать(ИмяВыходногоФайла);

   Объект.Ответ = ТекстовыйДокумент.ПолучитьТекст();

   ЭтаФорма.ОтветHTML = ТекстовыйДокумент.ПолучитьТекст();

   
   Попытка

       УдалитьФайлы(ИмяВыходногоФайла);

   Исключение

   КонецПопытки;

придется переделать под:

WinHttp = Новый COMОбъект(«WinHttp.WinHttpRequest.5.1»);

WinHttp.Option(2,»Windows-1251″);

WinHttp.Open(«POST», «https://site.ru»,0);

WinHttp.Send(НовыйЗапрос);

Кукиз= WinHttp.getResponseHeader(«Set-cookie»);

это нетрудно

Ниже содержание, вернувшегося в результате обработки запроса, сообщения

<html><head><title>Object moved</title></head><body>

<h2>Object moved to <a href=»/Query»>here</a>.</h2>

</body></html>

Вот исходный код страницы с обработанным запросом (параметры забивал вручную)…

<?xml version=»1.0″ encoding=»UTF-8″?>

<!DOCTYPE html PUBLIC «-//WAPFORUM//DTD XHTML Mobile 1.0//EN»

«http://www.wapforum.org/DTD/xhtml-mobile10.dtd»>

<html>

<head>

   <title>Мобильная версия — АС БДБ</title>

   <link href=»/Resources/Content/core.css» rel=»stylesheet» type=»text/css» />

</head>

<body>

   <div id=»header» class=»header»>

       <a href=»/»>АС БДБ</a>

   </div>

   <div id=»subtitle» class=»subtitle»>

       
   Запрос обработан

   </div>

   <div id=»body» class=»body»>

<div id=»RequestInfoDiv»>

   <span>

       <label for=»Blank_Code»>Код</label>: <strong>401851</strong><br />

       <label for=»Blank_Name»>Наименование</label>: <strong>ТН-2 (ПЭВМ) а4 1х2 </strong><br />

       <label for=»Blank_Series»>Серия</label>: <strong>ФК</strong><br />

       <label for=»Blank_Number»>Номер</label>: <strong>1083246</strong>

   </span>

</div>

<hr />

       <u>Приобретен</u>

       <div id=»PurchaseInfoTable»>

           <label for=»Blank_PurchaseInfo_RegistrationNumber»>УНП</label>: <strong>290473870</strong><br />

           <label for=»Blank_PurchaseInfo_EconomicEntityName»>Наименование</label>: <strong>Общество с ограниченной ответственностью &quot;Успех про&quot;</strong><br />

           <label for=»Blank_PurchaseInfo_Date»>Дата</label>: <strong>4.3.2013</strong><br />

       </div>

   </div>

   <div id=»footer» class=»footer»>

       <a href=»/Soi»>Полная версия сайта</a>

       <br />

       <span>© Расчетный центр НБ РБ</span>

   </div>

</body>

</html>

Кто сталкивался,  обратите внимание, не проходите мимо

(38) код отправки запроса

(55) обработанный запрос (параметры рууками заполнял)

(50) файл полученный с сайта

Как в 1с вместо (50) получить нормальный ответ, который содержится в (55) ??

oleg_km

62 — 21.05.13 — 22:10

1. Добрый день, мне необходимо отправить на сайт данные из 1C в JSON формате (по сути текстовый файл с определенной структурой). Но не могу понять, как избавиться от ошибки:
   «{Обработка.КрКл_1СВеб.Форма.Форма.Форма(406)}: Ошибка при вызове метода контекста (ОтправитьДляОбработки)
   HTTP.ОтправитьДляОбработки(ФайлЗапроса, Ресурс,
   по причине:
   Ошибка работы с Интернет: Не могу установить соединение»

   Я реализовал такую обработку:

    
   // Создаем объект HTTP-соединения с заданным сервером
   // Последний параметр указывает будет ли использоваться
   // защищенное соединение
   HTTP =  Новый HTTPСоединение("185.185.70.177",,,,,Истина);
   Ресурс = "/1c/sendFile";
   // Создаем временный файл, который будет
   // передан в теле POST-запроса
   ФайлЗапроса = ПолучитьИмяВременногоФайла();
   ТекстЧт = Новый ТекстовыйДокумент; 
   ТекстЧт.Прочитать("C:UsersAleksandrDesktopJSON.txt");    
   ТелоЗапроса = ТекстЧт;
   Объект.Реквизит1 =ТелоЗапроса;
   // Записываем в файл текстовое содержимое
   // тела запроса (переменная "ТелоЗапроса")
   ТекстовыйФайл = Новый ТекстовыйДокумент;
   ТекстовыйФайл.УстановитьТекст(ТелоЗапроса);         
   ТекстовыйФайл.Записать(ФайлЗапроса, КодировкаТекста.ANSI);
   // Получаем размер отправляемых данных в теле запроса
   ФайлОтправки = Новый Файл(ФайлЗапроса);
   РазмерФайлаОтправки = XMLСтрока(ФайлОтправки.Размер());
   // Подготовим временный файл для получения тела
   // ответа POST-запроса
   ФайлРезультата = ПолучитьИмяВременногоФайла();
   // Для того, чтобы установить заголовки 
   // POST-запроса создадим соответствие
   ЗаголовокHTTP = Новый Соответствие();
   // В этом примере устанавливаем в заголовках запроса
   // размер передаваемых данных и их тип
   ЗаголовокHTTP.Вставить("Content-Length", РазмерФайлаОтправки);
   ЗаголовокHTTP.Вставить("Content-Type", "application/json; charset=utf-8");
   
   HTTP.ОтправитьДляОбработки(ФайлЗапроса, Ресурс,
                              ФайлРезультата, ЗаголовокHTTP);
   // Получаем ответ веб-сервера на POST-запрос
   // в виде текста
   ТекстовыйФайлОтвет = Новый ТекстовыйДокумент;
   ТекстовыйФайлОтвет.Прочитать(ФайлРезультата,КодировкаТекста.UTF8);
   СтрокаОтветСервера = ТекстовыйФайлОтвет.ПолучитьТекст();

2. Убрал из строки значение Истина HTTP = Новый HTTPСоединение(«185.185.70.177»,,,,,Истина); т.е. получилось так
   HTTP = Новый HTTPСоединение(«185.185.70.177»,,,,,); Истина — это защищенное соединение, далее отключил антивирус, после этого ошибки ни какие не выдаются, но проблема в том, что
   СтрокаОтветСервера приходит с такими символами:»�����������������», что может быть? Веб ресурс проверял с помощью сервиса http://www.hurl.it/ — все работает.

   Последнее редактирование: 7 апр 2018
3. 
   

   Online

   nbIpKuH_BaH9I
   Модераторы
   Команда форума
   Модератор

   Регистрация:

   16 сен 2009

   Сообщения:

   8.123

   Симпатии:

   550

   Баллы:

   204

4. не то, я это уже сделал, мне нужно это отправить на веб. И сейчас при отправке, я получаю ответ от сервера такого вида: �����������������

5. 
   

   Offline

   nomad_irk
   Гуру в 1С

   Регистрация:

   20 окт 2008

   Сообщения:

   9.890

   Симпатии:

   1.030

   Баллы:

   204

   Вы на 100% уверены, что ответ приходит в кодировке UTF-8, а не Win1251?

7. 
   

   Offline

   nomad_irk
   Гуру в 1С

   Регистрация:

   20 окт 2008

   Сообщения:

   9.890

   Симпатии:

   1.030

   Баллы:

   204

   В таком случае, для чего вы делаете
   ТекстовыйФайлОтвет.Прочитать(ФайлРезультата,КодировкаТекста.UTF8);

   ?

8. чтобы понять что все ушло без ошибок

9. 
   

   Offline

   nomad_irk
   Гуру в 1С

   Регистрация:

   20 окт 2008

   Сообщения:

   9.890

   Симпатии:

   1.030

   Баллы:

   204

   Сделайте

   ТекПоток = Новый ЧтениеТекста(ИмяФайлаОтвета);
   ОтветСервера = ТекПоток.Прочитать();
   ТекПоток.Закрыть();

   и посмотрите на результат

10. проверил, utf-8, но обнаружил, что если структуру JSON с информацией загружать не из текстового файла, а из строки так:

    ДанныеОКлиенте = Новый Структура("kodapi", Объект.api_key);    ЗаписьJSON = Новый ЗаписьJSON; ЗаписьJSON.УстановитьСтроку(); ЗаписатьJSON(ЗаписьJSON, ДанныеОКлиенте); СтрокаДляТела = ЗаписьJSON.Закрыть();

    то отправляется и приходит правильный ответ. Тогда у меня вопрос почему если из текстового файла — не отправляется нормально. У меня просто довольно большая структура в него сохраняется для отправки. Структуру я проверял (копировал содержимое файла) на спец сервисе, если с него отправлять то ответ приходит правильный.

11. 
    

    Offline

    nomad_irk
    Гуру в 1С

    Регистрация:

    20 окт 2008

    Сообщения:

    9.890

    Симпатии:

    1.030

    Баллы:

    204

    Потому что на первый взгляд

    ......
    ТекстЧт = Новый ТекстовыйДокумент;
    ТекстЧт.Прочитать("C:UsersAleksandrDesktopJSON.txt");   
    ТелоЗапроса = ТекстЧт;
    Объект.Реквизит1 =ТелоЗапроса;
    ....

    есть чушь, т.к. ТекстЧт — это сам объект ТектовыйДокумент, а не его содержимое.

12. это я поправил еще вчера.

13. 
    

    Offline

    nomad_irk
    Гуру в 1С

    Регистрация:

    20 окт 2008

    Сообщения:

    9.890

    Симпатии:

    1.030

    Баллы:

    204

    Значит есть еще какие-то проблемы, известные только вам.

14. Последнее редактирование: 8 апр 2018

15. Да, вы оказались правы, я не сохранил изменения вчера и из-за этого не работало! Спасибо!