Вверх ↑
Ответов: 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