0
Protection
15.08.16
✎
17:44
|
Добрый День!
Помогите пожалуйста.
Мне нужно отправить файл который выгружает 1С на сайт
cyberlogistic.proficode.net/api/upload/?key=0a04340940efed0f7aa4761cccebd726.
С помощью POST Запроса.
Вот код , но мне нужно получить ответ от сервера "200",
а я получаю ответ "ЗагрузитеФайл".
Boundary = СтрЗаменить(Строка(Новый УникальныйИдентификатор()), "-", "");
ИмяФайлаОтвета = КаталогВременныхФайлов() + "answer.tmp";
ИмяФайлаДанных = "D:\Выгрузка.csv";
ИмяФайлаОтправки = КаталогВременныхФайлов() + "post.txt";
ФайлОтправки = Новый ЗаписьТекста(ИмяФайлаОтправки, КодировкаТекста.ANSI, Символы.ПС, ЛОЖЬ);
ФайлОтправки.ЗаписатьСтроку("--" + Boundary);
ФайлОтправки.ЗаписатьСтроку("Content-Disposition: form-data; name=""data""; filename=""" + ИмяФайлаДанных + """");
ФайлОтправки.ЗаписатьСтроку("--" + Boundary);
ФайлОтправки.Закрыть();
ЗаголовокHTTP = Новый Соответствие();
ЗаголовокHTTP.Вставить("Content-Type", "multipart/form-data; boundary=" + Boundary);
ФайлОтправки = Новый Файл(ИмяФайлаОтправки);
РазмерФайлаОтправки = XMLСтрока(ФайлОтправки.Размер());
ЗаголовокHTTP.Вставить("Content-Length", РазмерФайлаОтправки);
Сервер = "cyberlogistic.proficode.net/api/upload/?key=0a04340940efed0f7aa4761cccebd726";
Порт = "80";
НТТР = Новый HTTPСоединение(Сервер, Порт);
НТТР.ОтправитьДляОбработки(ИмяФайлаОтправки, "upload/?key=0a04340940efed0f7aa4761cccebd726", ИмяФайлаОтвета,);
|
|