Имя: Пароль:
1C
1С v8
Как передать файл методом POST, при помощи winhttp.winhttprequest.5.1?
0 aspect
 
24.02.12
15:10
Как передать файл методом POST, при помощи winhttp.winhttprequest.5.1?
Переменную методом POST передаю так:

WinHttp = Новый COMОбъект("WinHttp.WinHttpRequest.5.1");
   WinHttp.Option(2,"Windows-1251");
   WinHttp.Open("POST","http://127.0.0.1/test.php",0);
   
   WinHttp.SetRequestHeader("Accept-Language", "ru");
   WinHttp.SetRequestHeader("Accept-Charset","Windows-1251");
   WinHttp.setRequestHeader("Content-Language", "ru");
   WinHttp.setRequestHeader("Content-Charset", "Windows-1251");
   WinHttp.setRequestHeader("Content-Type","application/x-www-form-urlencoded; charset=Windows-1251");
   
   ПараметрыПОСТ = "fruit3=apple777";
   
   WinHttp.Send(ПараметрыПОСТ);
   
   Текст = Новый ЗаписьТекста("C:\temp\result.txt", КодировкаТекста.UTF8);
   Текст.ЗаписатьСтроку(WinHttp.ResponseText());
   Текст.Закрыть();
1 le_
 
24.02.12
15:16
2 aspect
 
24.02.12
15:24
(1) Читал, по причине геморности приведенного метода, решил не юзать HTTPСоединение. Кроме того еще и файл на стороне сервера нужно обрабатывать, а это уже от 1с не зависит и, если владелец сайта не имеет возможности реализовать эту обработку, может быть определяющим фактором для поиска другого пути решения.
3 aspect
 
24.02.12
15:29
Очень нужно.
4 aspect
 
24.02.12
15:37
Пятница
5 aspect
 
24.02.12
15:53
Еще раз подыму и сё.
6 Kreont
 
24.02.12
16:10
7 aspect
 
24.02.12
17:15
(6)Там нет про отправку файла, а про отправку переменной я указал в (0), только вместо записи в файл, в вашем варианте, она выводится в отчет.
8 orefkov
 
24.02.12
18:25
я wget'ом закидывал из батника.
9 aspect
 
27.02.12
02:17
В результате, если кому интересно, сколько ни *лся, пришлось использовать (1), время поджимает. Плюсом считаю отсутствие использования WinHttp.
10 Агент Инфостарта
 
27.02.12
09:52
(9) Почитай на досуге, начиная с Ответ #2
http://autoit-script.ru/index.php?topic=5345.0
Я не хочу быть самым богатым человеком на кладбище. Засыпать с чувством, что за день я сделал какую-нибудь потрясающую вещь — вот что меня интересует. Стив Джобс