Вверх ↑
Ответов: 537
Рейтинг: 14
#1: 2019-06-20 21:24:44 ЛС | профиль | цитата
С загрузкой файла получилось. Теперь ошибка 995 при отправке запроса на получение ссылок на картинку

Add(MainForm,2953706,70,336)
{
Width=521
Height=359
}
Add(DoData,10802303,245,308)
{
link(onEventData,1158501:doEvent1,[])
link(Data,8371718:getVar,[])
}
Add(Hub,1158501,294,308)
{
InCount=2
OutCount=1
link(onEvent1,11496362:doAdd,[])
}
Add(LineBreakEx,8371718,245,280)
{
Caption="head"
Type=2
}
Add(LineBreakEx,11388386,196,385)
{
Caption="head"
Type=3
link(_Data,6776100:RawHeaders,[])
}
Add(HTTPClient,6776100,175,336)
{
URL="http://www.imagebam.com/sys/upload/done/"
Method=1
UserAgent="Mozilla/5.0 (Windows NT 6.1; WOW64; Trident/7.0; rv:11.0) like Gecko"
URLCodePage=1
Point(Headers)
Point(RawHeaders)
link(onHeadersAvail,10802303:doData,[(219,342)(219,314)])
link(onFinish,1158501:doEvent2,[(282,349)(282,321)])
link(onError,12371759:doEvent,[])
link(Headers,971445:Text,[])
}
Add(Debug,12371759,231,357)
{
WEName="1"
VDName=""
}
Add(Button,11419334,126,336)
{
Left=5
Top=45
Width=80
Caption="Загрузить"
link(onClick,6776100:doLoadString,[])
}
Add(Edit,971445,189,259)
{
Left=10
Top=10
Width=480
Text="UPID=2ik2zuz7kt7lam1p6iy50gc9vn4dvy3x&sec=e38f212d5582e4b1b450209cec311be4"
}
Add(Memo,11496362,329,308)
{
Left=5
Top=85
Width=475
Height=210
ScrollBars=2
}
В ответ на запрос должен прийти код HTML

--- Добавлено в 2019-06-20 22:05:58

Сам сделал отправку запроса на получение ссылок на картинку, только без HTTPClient-а
Использовал HTTP_PostBuilder + Host + TCP_Client
карма: 4

0
Редактировалось 1 раз(а), последний 2019-06-20 22:05:58